5 lines
72 B
Text
5 lines
72 B
Text
|
to factorial :n
|
||
|
|
if :n < 2 [output 1]
|
||
|
|
output :n * factorial :n-1
|
||
|
|
end
|