RosettaCodeData/Task/Factorial/Ring/factorial.ring

6 lines
114 B
Plaintext

give n
x = fact(n)
see n + " factorial is : " + x
func fact nr if nr = 1 return 1 else return nr * fact(nr-1) ok