Pascal/Turbo Pascal - Practica 8

 
Vista:

Practica 8

Publicado por Gloria (1 intervención) el 03/01/2006 18:59:23
Hola a todos!!!Necesito ayuda por favor!!!Tengo que hacer esta practica y no tengo ni idea de por donde empezar!!!!si alguien me pueda dar alguna luz!!!
La practica consiste en:
Escribir un programa que presente el menú

Calcular el número PI
1.- Método 1
2.-Método 2
3.-Método 3
4.- Fin
y nos permita calcular una aproximación del número p mediante uno de los métodos indicados a continuación:
Método 1 (sumando un número determinado de términos)- Fórmula de Leibnitz

p=4*S (-1)i+1 / 2*i-1

Metodo 2 (Sumar términos hasta que uno sea menor que un valor p.e 0.001, es decir aproximar el número p con un error de 0.001)
p= ½* Ö(S 24/ i2)

Método 3(multiplicando un número determinado de términos) Fórmula de Wallis

p= 4* 2/3*4/3*4/5*4/6*6/7*8/7....

El programa se ejecutara tantas veces como desee el usuario.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Practica 8

Publicado por Allan Andrade (48 intervenciones) el 04/01/2006 16:42:02
Bien no entiendo muy bien que quieres decir con el numero “ P ”, pero para acceder a el menú que aparece en pantalla nada mas tienes que usar “ CASE OF ” algo así :
Var
Rs : char;

Rs:=readkey;
Case rs of
‘1’ : metodo1;
‘2’ : Metodo2;
‘3’ : metodo3;
‘4’ : salir;
end;

Éxitos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar