hallo, das ist ein rekursive funktion. das heißt, jeder funktionswert berechnet sich aus dem vorhergehenden. Siehe auch
Fibonacci-Zahlen.
Umsetzung so:
Delphi-Quellcode:
n := 0;
z := 1;
for n := 0 to MaxN do
z := (formel);
Showmessage(Format('Das %d. Element der Folger ist %d',[MaxN+1, z]));
Lukas Erlacher
Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1