Foro - Perl en Español

¡Hola! El objetivo de mi programa es calcular n! y pensando, tras entrar en numerosos bucles infinitos he llegado a elaborar un un programa que para mi está bien y se ejecuta pero que resulta que no funciona como tiene que hacerlo y en la pantalla no muestra el resultado. ¿Podéis darme alguna sugerencia o ayudarme a buscar el error?

Yo lo que veo es que estás usando un operador de comparación numérica ('==') en lugar de una asignación ('=') en la línea 12.

Y que en la primera vuelta, quieres hacer

$fac = $a * $n;

que en realidad es

$fac = $a * $temp;

que a su vez es

$fac = $a * $a;

y eso no es correcto según la definición de factorial.

Lo primero, ¡entendido! ¡Ah! y lo otro creo que también, me confundí porque sería $temp = $a; $n = $temp -1; y luego ya podría hallar $fact, ¿no? y restarle a la variable $a una unidad en cada vuelta. ¿Eso sería correcto?

He hecho alguna correción, pero aún no sirve

Cuando el programa llega a la línea 5, ¿cuánto vale $n?

A la hora de hacer programas, debes ponerte en el papel del ordenador... e intentar reproducir mentalmente o en un papel, qué es lo que va a hacer, paso a paso.

Toma un papel, y escribe en una línea todas las variables que tienes. Luego, empieza por la primera línea del programa, y comienza a dar valores a las variables o a modificarlas, según lo que digan las líneas, escribiendo los valores debajo de cada variable.

Así sabrás qué está pasando.