15 lines
230 B
Text
15 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
|