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

9 lines
209 B
Text

for(i = 1; i <= 100; i++) {
if(i % 3 == 0)
write, format="%s", "Fizz";
if(i % 5 == 0)
write, format="%s", "Buzz";
if(i % 3 && i % 5)
write, format="%d", i;
write, "";
}