Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
Delphi XE2 Professional
|
Re: Zinsrechnung
11. Dez 2006, 22:33
vielleicht so:
Delphi-Quellcode:
n:=0;
repeat
AKapital := AKapital * (zins / 100) + AKapital;
inc(n);
Until n = AJahre;
EKapital := AKapital;
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
|