RosettaCodeData/Task/Loops-N-plus-one-half/BASIC/loops-n-plus-one-half-5.basic

10 FOR i=1 TO 10
20 PRINT i;
30 IF i=10 THEN GOTO 50
40 PRINT ", ";
50 NEXT i