13 lines
182 B
Text
13 lines
182 B
Text
|
PROGRAM "n_plus_one_half"
|
||
|
|
|
||
|
|
DECLARE FUNCTION Entry()
|
||
|
|
|
||
|
|
FUNCTION Entry()
|
||
|
|
FOR i% = 1 TO 10
|
||
|
|
PRINT i%;
|
||
|
|
IF i% = 10 THEN EXIT FOR
|
||
|
|
PRINT ",";
|
||
|
|
NEXT i%
|
||
|
|
END FUNCTION
|
||
|
|
END PROGRAM
|