LET cm$ = ""
FOR i = 1 to 10
    PRINT cm$; str$(i);
    LET cm$ = ", "
NEXT i
END