Teilermenge ermitteln

[jfheins]

@CLRS530:

Delphi-Quellcode:

for i := 1 to 5 do
  maches (i);

=

Delphi-Quellcode:

procedure recurse (i: integer)
begin
  maches (i);
  if i < 5 then
    recurse (i + 1);
end;

recurse (1)