RosettaCodeData/Task/Loops-Continue/Commodore-BASIC/loops-continue.basic

6 lines
96 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
10 FOR I = 1 to 10
20 PRINT I;
30 IF INT(I/5) = I/5 THEN PRINT : GOTO 50
40 PRINT ", ";
50 NEXT