Link zu Maxima Online: http://maxima-online.org/?inc=r841815430
(%i1) "*"/* Einfache Zinsenrechnung nach der Tagesformel */;
(%o1) *
(%i2) "*"/* Beteiligt:
K -> Kapital,
p -> Zinssatz,
t -> Tage und
Z -> Zinsen*/;
(%o2) *
(%i3) S:{K,p,t,Z};
(%o3) {p, t, K, Z}
(%i4) "*"/* Drei Beteiligte müssen bekannt sein */;
(%o4) *
(%i5) Aufgabe:listify(powerset(S,3));
(%o5) [{p, t, K}, {p, t, Z}, {p, K, Z}, {t, K, Z}]
(%i6) "*"/* Zinsen gesucht */;
(%o6) *
(%i7) Aufgabe[1];
(%o7) {p, t, K}
(%i8) Z=K*p*t/36000.0,K=1000,p=3,t=180;
(%o8) Z = 15.0
(%i9) "*"/* Kapital gesucht */;
(%o9) *
(%i10) Aufgabe[2];
(%o10) {p, t, Z}
(%i11) K=Z*36000.0/(p*t),Z=30,p=3,t=90;
(%o11) K = 4000.0
(%i12) "*"/* Tage gesucht */;
(%o12) *
(%i13) Aufgabe[3];
(%o13) {p, K, Z}
(%i14) t=Z*36000.0/(K*p),Z=30,K=1000,p=3;
(%o14) t = 360.0
(%i15) "*"/* Zinssatz gesucht */;
(%o15) *
(%i16) Aufgabe[4];
(%o16) {t, K, Z}
(%i17) p=Z*36000.0/(K*t),Z=30,K=1000,t=180;
(%o17) p = 6.0
(%i18)
