RosettaCodeData/Task/FizzBuzz/Factor/fizzbuzz-1.factor

3 lines
121 B
Factor
Raw Permalink Normal View History

2025-06-11 20:16:52 -04:00
USE: math.parser
2026-02-01 16:33:20 -08:00
100 [1..b] [ { "Fizz" "Buzz" } { 3 5 } [ overd mod 0 = swap and ] 2map concat swap >dec or print ] each