progs/fun/fa0.fun
changeset 903 5d8df2afec51
parent 814 0db5961fe39f
equal deleted inserted replaced
902:d516888e5878 903:5d8df2afec51
       
     1 def fact(n) =
       
     2   (if n == 0 then 1 else n * fact(n - 1));
       
     3 
       
     4 
       
     5 write(fact(6))