RosettaCodeData/Task/FizzBuzz/Bracmat/fizzbuzz-2.bracmat
Ingy döt Net 518da4a923 B
2013-04-10 16:19:29 -07:00

12 lines
197 B
Text

0:?i
& whl
' ( 1+!i:<101:?i
& out
$ ( mod$(!i.3):0
& ( mod$(!i.5):0&FizzBuzz
| Fizz
)
| mod$(!i.5):0&Buzz
| !i
)
)