Fakultät |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 21.01.2012 |
Die Fakultät ist eine Funktion, die jeder natürlichen Zahl das Produkt ihrer Vorgänger mit sich selbst zuordnet. In der Mathematik schreibt man für "Fakultät von n" einfach "n!". Die Fakultät wächst sehr schnell, weshalb schon 21! nicht mehr in einen Int64 passt.Beispiel: Fakultät von 10: 10! = 1*2*3*4*5*6*7*8*9*10Die Fakultät lässt sich auf rekursiven und iterativem Wege bestimmen. Die rekursive ist mit der Zeit ''das'' Standard-Beispiel für Rekursion geworden, wenngleich die iterative Lösung ähnlich einfach, aber performanter ist, weshalb man diese bevorzugen sollte.Rekursive Variante:
Iterative Variante:
Aufgerufen werden kann die Funktion beispielsweise so:
procedure TForm1.Button2Click(Sender: TObject);
begin
ShowMessage(IntToStr(Factorial(10)));
end;
Als Ergebnis gibt die Funktion in diesem Falle '3628800' zurück. Weitere Informationen zur Fakultät finden sich u.a. im entsprechenden Wikipedia-Artikel.