FizzBuzz/Basic: Difference between revisions

Content added Content deleted
(FizzBuzz en True BASIC)
Line 327: Line 327:
150 END</lang>
150 END</lang>


=={{header|Tiny BASIC}}==
<lang tinybasic>
LET I=1
10 IF (I/15)*15<>I THEN GOTO 20
PRINT "FizzBuzz"
GOTO 100
20 IF (I/3)*3<>I THEN GOTO 30
PRINT "Fizz"
GOTO 100
30 IF (I/5)*5<>I THEN GOTO 40
PRINT "Buzz"
GOTO 100
40 PRINT I
100 LET I=I+1
IF I<=100 THEN GOTO 10
</lang>


=={{header|True BASIC}}==
=={{header|True BASIC}}==