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

/* [wxMaxima: title   start ]
Summe der ersten N natürlichen Zahlen
   [wxMaxima: title   end   ] */

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

/* [wxMaxima: comment start ]
******************************************
Dokumentnummer: D1095
Quelle: Johann Weilharter,
             Informatik
******************************************

Gegeben ist eine natürliche Zahl N. Die Summe der
natürlichen Zahlen von 1 bis N ist mit einer FOR-Schleife
zu bestimmen.

Eg ginge natürlich auch mit sum(i,i,1,N)
   [wxMaxima: comment end   ] */

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

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

/* [wxMaxima: input   start ] */
summe:0;
/* [wxMaxima: input   end   ] */

/* [wxMaxima: input   start ] */
n:read("Gib eine natürliche Zahl ein");
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
for i:1 thru n do
     ev(summe:summe+i);
/* [wxMaxima: input   end   ] */

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

/* [wxMaxima: input   start ] */
print("Summe =",summe)$
/* [wxMaxima: input   end   ] */

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