Anonymous user
Find limit of recursion: Difference between revisions
m
→Delphi: Fix up
(→Delphi) |
m (→Delphi: Fix up) |
||
Line 303:
----
==
{{works with|Delphi|5.0}}
<lang delphi>program Project2;
{$APPTYPE CONSOLE}
uses
Line 326:
Writeln('Recursion Level is ' + inttostr(Recursive(0)));
Readln(GetInput);
end.</lang>
Recursion Level is 4233548▼
Output:
▲<pre>Recursion Level is 4233548</pre>
=={{header|E}}==
| |||