RosettaCodeData/Task/Averages-Arithmetic-mean/Smalltalk/averages-arithmetic-mean-1.st
2013-04-10 14:58:50 -07:00

8 lines
206 B
Smalltalk

| numbers |
numbers := #(1 2 3 4 5 6 7 8).
(numbers isEmpty
ifTrue:[0]
ifFalse: [
(numbers inject: 0 into: [:sumSoFar :eachElement | sumSoFar + eachElement]) / numbers size ]
) displayNl.