/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/

/* [wxMaxima: title   start ]
Textaufgabe
   [wxMaxima: title   end   ] */

/* [wxMaxima: section start ]
Problembeschreibung
   [wxMaxima: section end   ] */

/* [wxMaxima: comment start ]
******************************************
Dokumentnummer: D1081
Quelle: http://www.edhelper.com
******************************************

There are two consecutive even integers. 
The square of the larger one is six hundred fifty-two more than the smaller one. 
What are the two integers?

   [wxMaxima: comment end   ] */

/* [wxMaxima: section start ]
Problemanalyse
   [wxMaxima: section end   ] */

/* [wxMaxima: comment start ]
x ist die erste gerade Zahl
x+2 ist die nächstfolgende gerade Zahl
(x+2)² ist das Quadrat der größeren Zahl
(x+2)²-652=x bedeutet: das Quadrat der größeren Zahl
                       ist um 652 größer als die kleinere Zahl
   [wxMaxima: comment end   ] */

/* [wxMaxima: section start ]
Problemösung
   [wxMaxima: section end   ] */

/* [wxMaxima: comment start ]
VERARBEITUNG
   [wxMaxima: comment end   ] */

/* [wxMaxima: comment start ]
Die Gleichung
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
g:(x+2)**2-652=x;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: comment start ]
Lösen  der Gleichung
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
l:solve(g,x);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
%,numer;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x1:ev(x,l[2]);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
x2:x1+2;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: comment start ]
AUSGABE
   [wxMaxima: comment end   ] */

/* [wxMaxima: input   start ] */
print("Die gesuchten Zahlen sind",x1,"und",x2)$
/* [wxMaxima: input   end   ] */

/* Maxima can't load/batch files which end with a comment! */
"Created with wxMaxima"$