RosettaCodeData/Task/FizzBuzz/Fe/fizzbuzz-2.fe
2023-07-01 13:44:08 -04:00

8 lines
166 B
Text

(= i 0)
(while (< i 100)
(= i (+ i 1))
(print
(if (is (mod i 15) 0) "FizzBuzz"
(is (mod i 3) 0) "Fizz"
(is (mod i 5) 0) "Buzz"
i)))