6 lines
121 B
Text
6 lines
121 B
Text
|
FIZZBUZZ
|
||
|
|
NEW I
|
||
|
|
FOR I=1:1:100 WRITE !,$SELECT(('(I#3)&'(I#5)):"FizzBuzz",'(I#5):"Buzz",'(I#3):"Fizz",1:I)
|
||
|
|
KILL I
|
||
|
|
QUIT
|