RosettaCodeData/Task/FizzBuzz/Smalltalk/fizzbuzz-5.st
2013-04-09 00:31:41 -07:00

5 lines
239 B
Smalltalk

fbz := (1 to: 100) asOrderedCollection.
3 to: 100 by: 3 do: [:i | fbz at: i put: 'Fizz'].
5 to: 100 by: 5 do: [:i | fbz at: i put: 'Buzz'].
15 to: 100 by: 15 do: [:i | fbz at: i put: 'FizzBuzz'].
fbz do: [:i | Transcript show: i; cr].