rekursivität :(

Hi,
ich bin am Informatik lernen und gleich am verzweifeln .

Zitat

Schreiben sie ein rekursives Programm, das das Gesamtkapital K einer Geldanlage K0 bei Verzinsung p nach n Jahren berechnet.

Also das wäre ja jetzt eine Funktion mit 3 Parametern.

Func berechnung($geld, $zinsen, $jahre)
If ;abbruchbedingung then
return ;irgendwas
Else
Return ;rekursive Funktion
EndIf
EndFunc

Ich hab keine Ansatz wie ich das machen könnte.
Ist hier vielleicht irgendjemand der mir gerade aus dem Stegreif sagen könnte wie man sowas macht? Entweder stehe ich gerade auf dem Schlauch oder ich kanns nicht

Da es sich eigentlich nicht um ein Problem mit AutoIt Handelt hab ich es mal Off-Topic gemacht.

Mit einer For-Schleife wäre es sooooo einfach, aber nei, scheiss rekursivtät.

Bin echt mal gespannt

Danke

Ich komme echt nicht drauf.
Mit einfachen Funktion geht das ja noch, wenn man nur die Fakultät berechnen soll, aber ich weis nicht, wie ich die Jahre da mit einbeziehen soll.

Zitat

Also erstellst du eine Funktion, die den Zinswert für einen Basiszeitraum errechnet.

Wie soll das gehen?

Ich kapiers nicht

DANKE BugFix.

Zitat

dass du dich in den Hintern beißen wirst

In AutoIt ist es aus irgendeinem Grund einfach aber sobald ich das in Delphi machen soll grig ich echt die Krise. Aber ich verstehe jetzt immerhin was ich falsch gemacht habe und hab noch ein bisschen Zeit zum üben :).

Dankeschön

Oh man.
Ich bin so blöd. Das is ja ganz einfach .
Ich hab gar nicht dran, dass wenn ich die Variable $K0 mit dem Zinssatz multipliziere, dass die dann ja lokal so bestehen bleibt. Das war mein großer Denkfehler.

Eigentlich macht die Funktion ja gar nichts anderes als

for $i = 1 to $jahre
$K0 = $K0 * $zinssatz
Next

Nur dass es mit For-Schleife viel leichter anzuwenden ist .

So, nochmal Danke
Und ich hoffe, dass ich jetzt wenigstens das Prinzip verstanden habe und es auch anwenden kann :D.

PS. (ist zwar eigentlich unwichtig aber dank euch läuft mein Programm ja jetzt) in Delphi sieht das jetzt so aus:

function zins(geld,zinssatz:real;jahre:integer):real;
begin
        if jahre = 0 then
                zins := geld
        else
                zins := zins(geld * (1 + zinssatz/100), zinssatz, jahre-1);
end;

.