Diferencia entre revisiones de «El factorial de cualquier número»
De Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11)
| Línea 7: | Línea 7: | ||
(%i9) fact(n):=block([prod:1], | (%i9) fact(n):=block([prod:1], | ||
| − | for k:1 thru n do prod:prod*k, | + | for k:1 thru n do prod:prod*k, |
| − | prod )$ | + | prod )$ |
Revisión del 12:06 3 may 2011
Enunciado Calcular el factorial de cualquier número con un búcle for.
Solución
(%i9) fact(n):=block([prod:1],
for k:1 thru n do prod:prod*k,
prod )$
(%i10) fact(45);
(%o10) 119622220865480194561963161495657715064383733760000000000