10 lines
141 B
Text
10 lines
141 B
Text
PROGRAM "downwardfor"
|
|
|
|
DECLARE FUNCTION Entry()
|
|
|
|
FUNCTION Entry()
|
|
FOR i% = 10 TO 0 STEP -1
|
|
PRINT i%
|
|
NEXT i%
|
|
END FUNCTION
|
|
END PROGRAM
|