RosettaCodeData/Task/FizzBuzz/Mathematica/fizzbuzz-1.math
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

1 line
113 B
Text

Do[Print[Which[Mod[i, 15] == 0, "FizzBuzz", Mod[i, 5] == 0, "Buzz", Mod[i, 3] == 0, "Fizz", True, i]], {i, 100}]