additionsprogramm funzt net

**PomBär**

hallo leute
ich wollte ein additionsprogramm schreiben und habe folgendes eingetippt:

Delphi-Quellcode:

			var a,b,gesamt:integer;

begin

  writeln('gib zwei ganze zahlen ein');

  read(a,b);

  gesamt:=a+b;

  writeln('und wie ist das ergebnis?');

  writeln('das ergebnis von' ,a,'+' ,b, '=' ,gesamt);

  writeln('schluss jetzt');

end.

mein problem ist, dass er zwar compiliert aber kein ergebnis ausgibt. er fragt die beiden eingaben ab und läuft dann ohne irgendeine ausgabe durch. erst wenn ich einen anhanltepunkt bei
writeln('schluss jetzt');
mache arbeitet er
writeln('das ergebnis von' ,a,'+' ,b, '=' ,gesamt); ab.
könnt ihr mir bitte helfen?

additionsprogramm funzt net

additionsprogramm funzt net

Forumregeln