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

5 lines
89 B
Text

dim as string cm = ""
for i as ubyte = 1 to 10
print cm;str(i);
cm = ", "
next i