/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/ /* [wxMaxima: title start ] Mischungsrechnung [wxMaxima: title end ] */ /* [wxMaxima: section start ] Problembeschreibung [wxMaxima: section end ] */ /* [wxMaxima: comment start ] ****************************************** Dokumentnummer: D1058 Quelle: Johann Weilharter, Wirtschaftsrechnen ****************************************** Die Preise für ein Liter Normalbenzin sind pn € und für ein Liter Superbenzin ps € . Jemand mischt Normal und Super und tankt eine bestimmte Menge (in Liter). Dafür muss er dann einen bestimmten Rechnungsbetrag in € bezahlen. [wxMaxima: comment end ] */ /* [wxMaxima: section start ] Problemlösung [wxMaxima: section end ] */ /* [wxMaxima: comment start ] EINGABE [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ Menge:read("Wie viel Liter wird getankt?"); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ pn:read("Preis für ein Liter Normalbenzin?"); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ ps:read("Preis für ein Liter Superbenzin?"); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ Rechnungsbetrag:read("Wie viel muss bezahlt werden?"); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] VERARBEITUNG [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ g1:pn*mn+ps*ms=Rechnungsbetrag; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ g2:mn+ms=Menge; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ l:algsys([g1,g2],[mn,ms]); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ Menge_Normal:mn,l[1][1]; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ Menge_Super:ms,l[1][2]; /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] AUSGABE [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ print("Liter Normalbenzin getankt",Menge_Normal)$ /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ print("Liter Superbenzin getankt",Menge_Super)$ /* [wxMaxima: input end ] */ /* Maxima can't load/batch files which end with a comment! */ "Created with wxMaxima"$