Einfache Zinsenrechnung (Tagesformel)

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)