7 lines
153 B
Text
7 lines
153 B
Text
for i := 1 upto 100:
|
|
message if i mod 15 = 0: "FizzBuzz" &
|
|
elseif i mod 3 = 0: "Fizz" &
|
|
elseif i mod 5 = 0: "Buzz" &
|
|
else: decimal i & fi "";
|
|
endfor
|
|
end
|