RosettaCodeData/Task/Factorial/Smalltalk/factorial-4.st

5 lines
106 B
Smalltalk

| fac |
fac := [ :n | (1 to: n) inject: 1 into: [ :prod :next | prod * next ] ].
fac value: 10.
"3628800"