Acciones

El factorial de cualquier número

De Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11)

Enunciado Calcular el factorial de cualquier número.


Solución

(%i9) fact(n):=block([prod:1], for k:1 thru n do prod:prod*k, prod )$

(%i10) fact(45); (%o10) 119622220865480194561963161495657715064383733760000000000