16 lines
392 B
Text
16 lines
392 B
Text
repeat with i = 1 to 100
|
|
switch
|
|
case i mod 15 = 0
|
|
put "FizzBuzz" & cr after fizzbuzz
|
|
break
|
|
case i mod 5 = 0
|
|
put "Buzz" & cr after fizzbuzz
|
|
break
|
|
case i mod 3 = 0
|
|
put "Fizz" & cr after fizzbuzz
|
|
break
|
|
default
|
|
put i & cr after fizzbuzz
|
|
end switch
|
|
end repeat
|
|
put fizzbuzz
|