aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Add all the A tasks

Browse source
This commit is contained in:
Ingy döt Net 2013-04-10 14:58:50 -07:00
parent 2dd7375f96
commit 051504d65b
1608 changed files with 18584 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Task/Averages-Arithmetic-mean/Smalltalk/averages-arithmetic-mean-1.st Normal file
View file

@ -0,0 +1,8 @@
| 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.

4
Task/Averages-Arithmetic-mean/Smalltalk/averages-arithmetic-mean-2.st Normal file
View file

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

4
Task/Averages-Arithmetic-mean/Smalltalk/averages-arithmetic-mean-3.st Normal file
View file

@ -0,0 +1,4 @@
| numbers |
numbers := #(1 2 3 4 5 6 7 8).
(numbers sum / numbers size) displayNl.

4
Task/Averages-Arithmetic-mean/Smalltalk/averages-arithmetic-mean-4.st Normal file
View file

@ -0,0 +1,4 @@
| numbers |
numbers := #(1 2 3 4 5 6 7 8).
numbers average displayNl.