16 lines
230 B
Text
16 lines
230 B
Text
|
|
PROGRAM "Find limit of recursion"
|
||
|
|
|
||
|
|
DECLARE FUNCTION Entry ()
|
||
|
|
DECLARE FUNCTION Recursion(n)
|
||
|
|
|
||
|
|
FUNCTION Entry ()
|
||
|
|
Recursion (0)
|
||
|
|
END FUNCTION
|
||
|
|
|
||
|
|
FUNCTION Recursion (i)
|
||
|
|
PRINT i
|
||
|
|
Recursion (1 + i)
|
||
|
|
|
||
|
|
END FUNCTION
|
||
|
|
END PROGRAM
|