progs/fun/fact.fun
changeset 814 1fbaa5f05516
parent 735 fc2e3609d5e5
equal deleted inserted replaced
813:059f970287d1 814:1fbaa5f05516
     7 def facTi(n) = facT(n, 1);
     7 def facTi(n) = facT(n, 1);
     8 
     8 
     9 //fact(10)
     9 //fact(10)
    10 //facTi(10)
    10 //facTi(10)
    11 
    11 
    12 write(facTi(6))
    12 write(fact(6)); facTi(6)
    13 
    13 
    14 // a simple factorial program
    14 // a simple factorial program
    15 // (including a tail recursive version)
    15 // (including a tail recursive version)