RosettaCodeData/Task/Factorial/Red/factorial-1.red
2023-07-01 13:44:08 -04:00

2 lines
101 B
Text

fac: function [n][r: 1 repeat i n [r: r * i] r]
fac: function [n][repeat i also n n: 1 [n: n * i] n]