100 FOR I=1 TO 10
110 PRINT STR$(I);
120 IF MOD(I,5)=0 THEN
130 PRINT
140 ELSE
150 PRINT ", ";
160 END IF
170 NEXT