Einzelnen Beitrag anzeigen
Ungelesen 26.09.13, 18:30   #1
savasabi
Anfänger
 
Registriert seit: Sep 2012
Beiträge: 8
Bedankt: 2
savasabi ist noch neu hier! | 0 Respekt Punkte
Standard Perl Rekursion "Fibonnacci"

Hallo,

kann mir jemand erklären, wie das Programm zu dem unten genannten Ergebnis kommt?Ich versteh den Rechenweg nicht.
Also der erste Wert ist klar, ist der Zähler von der Schleife. Aber der zweite Wert, ich versteh nicht wie es zu diesen Zahlen kommt.

---------------------------------------------------------------
sub fibonacci{

my($value)=@_;
return 1 if $value <= 2;
return fibonacci($value -1)+fibonacci($value -2);
}
print "$_: ", fibonacci($_), "\n" for (1 .. 7);

-----------------------------------------------------------------
Die Ausgabe ist folgende:

1: 1
2: 1
3: 2
4: 4
5: 8
6: 16
7: 32

Danke im Vorraus
savasabi ist offline   Mit Zitat antworten