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

7 lines
91 B
Plaintext

FOR i = 1 TO 10
PRINT STR$(i);
IF (i MOD 5) THEN PRINT ", "; ELSE PRINT
NEXT i
PRINT
END