Schnelle einführung in die Rekursion gesucht

[brechi]

Delphi-Quellcode:

function fakultaet(n: integer): integer;
begin
  if (n < 2 then)
    Result := 1 else
    Result := n*fakultaet(n-1);  //rekursiver aufruf
end;

Einfachstes Beispiel und es sollte selbsterklärend sein