progs/fact.fun
changeset 626 c75c730bdf11
parent 224 70198792c2aa
child 655 689d1bdd91c0
equal deleted inserted replaced
625:f8d3e2c7d8b2 626:c75c730bdf11
       
     1 def fact(n) = if n == 0 then 1 else n * fact(n - 1);
       
     2 
       
     3 def facT(n, acc) = if n == 0 then acc else facT(n - 1, n * acc);
       
     4 
       
     5 facT(15, 1)
       
     6 
       
     7 //fact(15)
       
     8