9 lines
135 B
Text
9 lines
135 B
Text
|
|
PROCEDURE nAndAHalf
|
||
|
|
DIM i:INTEGER
|
||
|
|
FOR i:=1 TO 10
|
||
|
|
PRINT i;
|
||
|
|
EXITIF i=10 THEN ENDEXIT
|
||
|
|
PRINT ", ";
|
||
|
|
NEXT i
|
||
|
|
PRINT
|