| karlos9 |  |
|
2008-04-15 19:37 - Respuestas: 6 - Tema nº: 2512814
Características: Windows XP Home procesador intel pentium.
hola , alguien me ayuda por favor?? quisiera saber como puedo hacer un programa en turbo pascal usando "repeat" que me calcule el factorial de un numero entero leido desde el teclado, y luego con "for" calcular la suma de 1/2+ 1/2(al cuadrado) +1/2(a la tres)+....1/2(elevado a n), es un problema corto pero nose hacerlo, lo necesito para hoy si alguien me puede ayudar, muchas graciaaasss
| |
|
|
| Hurricane |  |
|
Re: Turbo pascal - 2008-04-15 19:51 - Respuesta 2
Problema del Factorial:
Program Factorial;
Uses
Crt;
Var
Num :Integer;
Fact :LongInt;
Begin
ClrScr;
Write('Ingrese un número entero: ');
ReadLn(Num);
Fact := 1;
Repeat
Fact := Fact * Num;
Num := Num-1;
Until (Num | |
|
|
| Hurricane | |
|
Re: Turbo pascal - 2008-04-15 19:53 - Respuesta 3
Hmmmmm...... Sale mal..... a partir del Until:
Until (Num | |
|
|
| Hurricane | |
|
Re: Turbo pascal - 2008-04-15 19:54 - Respuesta 4
Vaya..... desde Until:
Until (Num .MENORQUE. 2);
WriteLn('El Factorial es: ', Fact);
ReadLn;
End.
Saludos
HURRICANE
| |
|
|
| karlos9 | |
|
Re: Turbo pascal - 2008-04-15 19:58 - Respuesta 5
muchaasss graciaassss eres un crak gracias, y para calcular lo de la suma?? como lo escribo en pascal???? bueno eso ya si tienes tiempo y te aburres que con lo que me has dicho he avanzado mas que sin saber nada, muchas graciaassss | |
|
|
|
