Acciones

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 5: Línea 5:
 
'''Solución'''
 
'''Solución'''
  
(%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 13: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