4 lines
78 B
Text
4 lines
78 B
Text
def (fact n)
|
|
ret result 1
|
|
for i 1 (i <= n) ++i
|
|
result <- result*i
|