FizzBuzz/Basic: Difference between revisions
Content added Content deleted
(FizzBuzz en Yabasic) |
(FizzBuzz en True BASIC) |
||
| Line 326: | Line 326: | ||
140 NEXT I |
140 NEXT I |
||
150 END</lang> |
150 END</lang> |
||
=={{header|True BASIC}}== |
|||
<lang qbasic> |
|||
FOR number = 1 TO 100 |
|||
IF MOD(number, 15) = 0 then |
|||
PRINT "FizzBuzz" |
|||
ELSEIF MOD(number, 3) = 0 then |
|||
PRINT "Fizz" |
|||
ELSEIF MOD(number, 5) = 0 then |
|||
PRINT "Buzz" |
|||
ELSE |
|||
PRINT number |
|||
END IF |
|||
NEXT number |
|||
END |
|||
</lang> |
|||
=={{header|Visual Basic .NET}}== |
=={{header|Visual Basic .NET}}== |
||