8 lines
300 B
Smalltalk
8 lines
300 B
Smalltalk
fizzbuzz := Dictionary with: #(true true)->'FizzBuzz'
|
|
with: #(true false)->'Fizz'
|
|
with: #(false true)->'Buzz'.
|
|
|
|
1 to: 100 do:
|
|
[ :i | Transcript show:
|
|
(fizzbuzz at: {i isDivisibleBy: 3. i isDivisibleBy: 5}
|
|
ifAbsent: [ i ]); cr]
|