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