RosettaCodeData/Task/Loops-N-plus-one-half/SETL/loops-n-plus-one-half.setl

program n_plus_one_half;
    loop init
        i := 1;
    doing
        nprint(i);
    while i < 10 do
        i +:= 1;
        nprint(", ");
    end loop;
    print;
end program;