Aufgabe:
Für einen Anzahl von Aufgaben sind die Zinsen nach der Tagesformel zu berechnen.
Programmcode:
K:[1000,2000,3000,4000,5000]; p:[2.25,1.875,2.5,3,2.785]; t:[180,90,360,270,360]; Z:K*p*t/36000.0; n:length(K); Liste:makelist([K[i],p[i],t[i],Z[i]],i,1,n); print(""); printf(true,"~{~{~9,2f ~}~%~}",Liste);
Lösung:
Maxima Online: http://maxima-online.org/?inc=r284031028
Listen zu einer Aufgabentabelle zusammenfassen:
http://maxima-online.org/?inc=r-806702196
Berechnung der Zinsen mit einer Funktion: http://maxima-online.org/?inc=r-1092873340
Programmcode dazu:
Aufgabe:[[1000, 2.25, 180], [2000, 1.875, 90], [3000, 2.5, 360], [4000, 3, 270],[5000, 2.785, 360]]; m:length(Aufgabe); Zinsen(x):=floor(x[1]*x[2]*x[3]/36000.0*100+0.5)/100.0; map(Zinsen,Aufgabe);