RosettaCodeData/Task/Loops-Continue/QBasic/loops-continue.basic

7 lines
91 B
Text
Raw Permalink Normal View History

2024-11-04 20:28:54 -08:00
FOR i = 1 TO 10
PRINT STR$(i);
IF (i MOD 5) THEN PRINT ", "; ELSE PRINT
NEXT i
PRINT
END