Rekursion zu Iteration

[gordon freeman]

Sorry, hab mich falsch ausgedrückt, ich meinte 3 gradige Rekursion, also:

Delphi-Quellcode:

procedure recursion(n: paramter);
begin
if not (Endbedingung) then 
  begin
   recursion(modify1(n));
   recursion(modify2(n));
   recursion(modify3(n));
  end;
end;

EDIT: Das mit der Rekursion ist aber auch vertrackt