RosettaCodeData/Task/Factorial/Smalltalk/factorial-4.st
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

4 lines
106 B
Smalltalk

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