Also, ihr meint folgendermaßen sollte es ausschauen:
Delphi-Quellcode:
program testauswertung
uses crt;
var startwert, endwert, nr, summe, punkte:integer;
begin
clrscr;
summe:=0;
writeln('Bitte Startwert eingeben!!!');
readln(startwert);
writeln('Bitte Endwert eingeben!!!');
readln(endwert);
FOR nr:=startwert TO endwert DO
begin
writeln('Aufgabe: ',nr);
readln(punkte);
summe:=summe+punkte;
end;
writeln('Gesamtpunktezahl: ',summe);
readln;
end.
Muss man denn sonst noch etwas umändern
Danke, Martin