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

6 lines
89 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
dim as string cm = ""
for i as ubyte = 1 to 10
print cm;str(i);
cm = ", "
next i