14 lines
173 B
Turing
14 lines
173 B
Turing
$$ MODE TUSCRIPT
|
|
LOOP n=1,100
|
|
mod=MOD (n,15)
|
|
SELECT mod
|
|
CASE 0
|
|
PRINT n," FizzBuzz"
|
|
CASE 3,6,9,12
|
|
PRINT n," Fizz"
|
|
CASE 5,10
|
|
PRINT n," Buzz"
|
|
DEFAULT
|
|
PRINT n
|
|
ENDSELECT
|
|
ENDLOOP
|