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

/* [wxMaxima: title   start ]
Heronsche Formel
   [wxMaxima: title   end   ] */

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

/* [wxMaxima: comment start ]
******************************************
Dokumentnummer: D1023
Quelle: Johann Weilharter,
             Analytische Geometrie 2
******************************************

Die Fläche eines Dreicks ist nach der Heronschen
Formel zu bestimmen.
   [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 Seite a des Dreiecks ein");
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
b:read("Gib die Seite b des Dreiecks ein");
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
c:read("Gib die Seite c des Dreiecks ein");
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
u:a+b+c;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
s:u/2;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f:sqrt(s*(s-a)*(s-b)*(s-c));
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
f:ratsimp(f);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
print("Die Fläche ist",f)$
/* [wxMaxima: input   end   ] */

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