RosettaCodeData/Task/Loops-Continue/Sinclair-ZX81-BASIC/loops-continue.basic
2023-07-01 13:44:08 -04: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