10 lines
125 B
QBasic
10 lines
125 B
QBasic
FOR A = 1 TO 100
|
|
PRINT A ;
|
|
B = A % 3
|
|
C = A % 5
|
|
IF B = 0 then PRINT "Fizz" ;
|
|
IF C = 0 then PRINT "Buzz" ;
|
|
PRINT ""
|
|
NEXT A
|
|
END
|