unbanked

Fizz Buzz

Oct 10th, 2017
317
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 100 REM http://yohan.es/swbasic/
  2. 120 FOR X = 1 TO 100
  3. 140 IF X MOD 5 = 0 AND X MOD 3 = 0 THEN PRINT "FIZZ BUZZ" ELSE 150
  4. 145 X=X+1
  5. 150 IF X MOD 3 = 0 THEN PRINT "FIZZ" ELSE 160
  6. 155 X=X+1
  7. 160 IF X MOD 5 = 0 THEN PRINT "BUZZ" ELSE 170
  8. 165 X=X+1
  9. 167 IF X=101 THEN END
  10. 170 PRINT X
  11. 180 NEXT
Advertisement