Stair-climbing puzzle: Difference between revisions
→{{header|Delphi}}
Line 388:
{{works with|Delphi|6.0}}
{{libheader|SysUtils,StdCtrls}}
Recursive version using no variables other than the Boolean returned by "Step"
<syntaxhighlight lang="Delphi">
Line 399 ⟶ 401:
</syntaxhighlight>
Iterative versions using one variable.
<syntaxhighlight lang="Delphi">
Line 411 ⟶ 415:
end;
</syntaxhighlight>
Functional example program
<syntaxhighlight lang="Delphi">
| |||