In Luckies Code ist mMn ein Denkfehler (mathem. gesehen):
Das Endkapital im nullten Jahr ist das Startkapital. Somit die Zeile
EndKapital := 0.0;
ändern in
EndKapital := Startkapital;
Anschließend ist in jedem Jahr das (neue) Startkapital das Endkapital des Vorjahres, somit:
Delphi-Quellcode:
for i := 1 to Jahre do
EndKapital := EndKapital*(Zins/100)+StartKapital;
ändern zu:
Delphi-Quellcode:
for i := 1 to Jahre do
begin
Startkapital:=Endkapital;
EndKapital := EndKapital*(Zins/100)+StartKapital;
end;
dann sollte es doch stimmen??? Zinsrechnung ist schon so lange her...