RosettaCodeData/Task/FizzBuzz/RapidQ/fizzbuzz.rapidq
2023-07-01 13:44:08 -04:00

4 lines
121 B
Text

FOR i=1 TO 100
t$ = IIF(i MOD 3 = 0, "Fizz", "") + IIF(i MOD 5 = 0, "Buzz", "")
PRINT IIF(LEN(t$), t$, i)
NEXT i