RosettaCodeData/Task/FizzBuzz/GAP/fizzbuzz.gap
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

14 lines
249 B
Text

FizzBuzz := function()
local i;
for i in [1 .. 100] do
if RemInt(i, 15) = 0 then
Print("FizzBuzz\n");
elif RemInt(i, 3) = 0 then
Print("Fizz\n");
elif RemInt(i, 5) = 0 then
Print("Buzz\n");
else
Print(i, "\n");
fi;
od;
end;