[fenster]

program Rentrechung (input, output);
{Berechnet den Entwert bei einer vorsch�ssigen Rentenrate die Jährlich
verzinst ist}

const
x = 1;

var
Zinssatz,
Rentenratejv,
Jahre,
Endwert : real;

begin
writeln ('Berechung des Endwertes.');
write ('Geben sie den Zinssatz ein: ');
readln (Zinssatz);
write ('Geben sie die J„hrliche Rentenrate ein: ');
readln (Rentenratejv);
write ('Geben sie die Analgedauer Jahren ein ');
readln (Jahre);
Endwert := Rentenratejv * Zinssatz * (Zinssatz * exp(Jahre* ln(Zinssatz)) - x / Zinssatz - x);
writeln ('Der Endwert betr„gt: ', Endwert)
end. {Rentenrechung)



================================================== ===========
lässt sich zwar compilen
rechnet aber falsch
bei einem Zinssatz von 1.04
einer rentenrate von 100
anlagedauer von 2 jahren
kommt heraus -7.7468.......

herauskommen müsste 212.16


checkt das mal

gruß
fenster