FizzBuzz/Basic: Difference between revisions
Content added Content deleted
(moved entry and gave it a header) |
|||
| Line 98: | Line 98: | ||
Lbl 1↵ |
Lbl 1↵ |
||
Next</lang> |
Next</lang> |
||
=={{header|FreeBASIC}}== |
|||
<lang freebasic>'FreeBASIC |
|||
Dim As ULong n |
|||
For n = 1 To 100 |
|||
If n Mod 15 = 0 Then |
|||
Print "FizzBuzz" |
|||
ElseIf n Mod 3 = 0 Then |
|||
Print "Fizz" |
|||
ElseIf n Mod 5 = 0 Then |
|||
Print "Buzz" |
|||
Else |
|||
Print n |
|||
End If |
|||
Next n |
|||
sleep</lang> |
|||
=={{header|GW-BASIC}}== |
=={{header|GW-BASIC}}== |
||