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

9 lines
100 B
Plaintext

10 a=1
20 print a ;
30 if a-10 goto 100
40 goto 130
100 print ", ";
110 a=a+1
120 goto 20
130 print