RosettaCodeData/Task/Loops-N-plus-one-half/GW-BASIC/loops-n-plus-one-half.basic
2023-07-01 13:44:08 -04:00

5 lines
72 B
Text

10 C$ = ""
20 FOR I = 1 TO 10
30 PRINT C$;STR$(I);
40 C$=", "
50 NEXT I