/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/ /* [wxMaxima: title start ] Zahlenrätsel [wxMaxima: title end ] */ /* [wxMaxima: section start ] Problembeschreibung [wxMaxima: section end ] */ /* [wxMaxima: comment start ] **************************************************** Dokumentnummer: D1002 Quelle: http://www.edhelper.com **************************************************** Welche Zahl x ergibt, wenn sie um a weniger als diese Zahl dividiert wird, die Zahl b ? Testdaten: a= 10 b = 1 5/21 [wxMaxima: comment end ] */ /* [wxMaxima: section start ] Problemlösung [wxMaxima: section end ] */ /* [wxMaxima: comment start ] EINGABE [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ a:read("Gib die Zahl a ein"); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ b:read("Gib die Zahl b ein"); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] VERARBEITUNG [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ g:x/(x-a)=b; /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ l:solve(g,x); /* [wxMaxima: input end ] */ /* [wxMaxima: input start ] */ x:ev(x,l[1]); /* [wxMaxima: input end ] */ /* [wxMaxima: comment start ] AUSGABE [wxMaxima: comment end ] */ /* [wxMaxima: input start ] */ print("Die gesuchte Zahl ist",x)$ /* [wxMaxima: input end ] */ /* Maxima can't load/batch files which end with a comment! */ "Created with wxMaxima"$