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

10 REM Loops/N plus one half
20 LET I = 1
30 IF I = 10 THEN PRINT I
40 IF I < 10 THEN PRINT I; ", ";
50 IF I = 10 THEN END
60 LET I = I + 1
70 GOTO 30