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

/* [wxMaxima: title   start ]
Geradliniger Flug (Textaufgabe)
   [wxMaxima: title   end   ] */

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

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

Zwei amerikanische Flugzeuge verlassen einen Flughafen zur selben
Zeit in entgegengesetzte Richtungen. Wann haben sie einen bestimmten
Abstand erreicht?

Testdaten:
Geschwindigkeit Flugzeug 1 = 304 mph
Geschwindigkeit Flugzeug 2 = 225 mph
Abstand                                   = 2346 m

   [wxMaxima: comment end   ] */

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

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

/* [wxMaxima: input   start ] */
vA:read("Gib die Geschwindigkeit des ersten Flugzeugs ein in mph");
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
vB:read("Gib die Geschwindigkeit des zweiten Flugzeugs ein in mph");
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
Abstand:read("Welcher Abstand soll erreicht werden in Meilen = m?");
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
g:Abstand=vA*t+vB*t;
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
t:ev(t,l[1]);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
h:floor(t);
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
m:(t-h)*60;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
m:floor(m);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
print("Es dauert",h,"Stunden und",m,"Minuten")$
/* [wxMaxima: input   end   ] */

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