Testauswertungsprogramm - Variablen umändern

[sx2008]

Zitat von FreePascal:

Wenn ich dann die Eingabetaste drücke, um das Programm zu beenden, komm ich dann nur immer eine Zeile weiter runter, doch nicht zur Programmierung.

Das Problem wird wohl sein, dass readln eine Integervariable einlesen möchte.
Da du readln() aber nicht gibst was es verlangt bist du gefangen.

Delphi-Quellcode:

var ....
zeile : String;

FOR nr:=startwert TO endwert DO
begin
  writeln('Aufgabe: ',nr);
  readln(zeile);  // als String einlesen
  zeile := Trim(zeile);  // Leerzeichen raus
  if zeile = '' then break;  // Abbruch, falls Benutzer keine Lust mehr hat
  punkte := StrToInt(zeile);  
  summe:=summe+punkte;
end;