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

7 lines
83 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
LET cm$ = ""
FOR i = 1 to 10
PRINT cm$; str$(i);
LET cm$ = ", "
NEXT i
END