変形Fizz-Buzz問題
Posted feedbacks - Smalltalk
Squeak Smalltalk で。
1 2 3 4 5 6 7 8 9 | | fizzs buzzs |
fizzs := #('' '' Fizz).
buzzs := #('' '' '' '' Buzz).
World findATranscript: nil.
1 to: 20 do: [:idx |
| message |
message := (fizzs atWrap: idx), (buzzs atWrap: idx).
message ifEmpty: [message := #hoge].
Transcript cr; show: idx; show: #:, message]
|


raynstard
#3758()
Rating0/2=0.00
[ reply ]