RosettaCodeData/Task/Loops-Continue/NS-HUBASIC/loops-continue.basic
2023-07-01 13:44:08 -04:00

5 lines
96 B
Text

10 FOR I=1 TO 10
20 PRINT I;
30 IF I-I/5*5=0 THEN PRINT :GOTO 50"CONTINUE
40 PRINT ",";
50 NEXT