# Zinseszins: Zinssatz

## Problembeschreibung

******************************************
Dokumentnummer: D1182
Gebiet: Finanzmathematik
******************************************

Gegeben sind:
a)Anfangskapital
b)Endkapital
c)Laufzeit

Gesucht ist der Zinssatz

## Problemlösung

EINGABE

Ko:read("Gib das Anfangskapital ein");

Kn:read("Gib das Endkapital ein");

n:read("Gib die Laufzeit in Jahren ein");

VERARBEITUNG

g:Kn=Ko*r**n;

l:realroots(g),numer;

r:ev(r,l[2]);

g:r=(1+p/100);

l:realroots(g),numer;

p:ev(p,l[1]);

p:floor(p*1000+0.5)/1000.0;

ergebnis:matrix(
 ["Anfangskapital =",Ko], 
 ["Endkapital =",Kn], 
 ["Laufzeit in Jahren =",n], 
 ["Zinssatz =",p]
)$

AUSGABE

print(ergebnis)$