Aufgabe:
Man berechne Barwert und Endwert bei einem Zinssatz von p=2%.

Beispiel für die Erstellung einer Zeitlinie:
load(finance)$
graph_flow([-5000,-3000,800,1300,1500,2000])$
graph_flow([-5000,-3000,800,1300,1500,2000])$
Code:
p:2; i:p/100; r:1+i; B:5000+3000/r+1000/r^2+4000/r^3+5000/r^4+2000/r^5; E:5000*r^5+3000*r^4+1000*r^3+4000*r^2+5000*r+2000;
wxMaxima:
Geogebra CAS: