RosettaCodeData/Task/FizzBuzz/Arc/fizzbuzz-2.arc
2016-12-05 23:44:36 +01:00

4 lines
193 B
Text

(for n 1 100
(prn:check (string (when (multiple n 3) 'Fizz)
(when (multiple n 5) 'Buzz))
~empty n)) ; check created string not empty, else return n