RosettaCodeData/Task/Loops-Continue/BASIC/loops-continue-8.basic
2017-09-25 22:28:19 +02:00

6 lines
117 B
Text

10 FOR I=1 TO 10
20 PRINT I;
30 IF I/5=INT (I/5) THEN PRINT
40 IF I/5=INT (I/5) THEN NEXT I
50 PRINT ", ";
60 NEXT I