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

DIM i AS Integer

FOR i=1 TO 10
    PRINT i;
    IF i=10 THEN EXIT FOR
    PRINT ", ";
NEXT i