Einzelnen Beitrag anzeigen

PomBär

Registriert seit: 28. Sep 2003
Ort: MV
57 Beiträge
 
Delphi 6 Professional
 
#1

additionsprogramm funzt net

  Alt 27. Dez 2003, 14:34
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?
Je weniger einer weiß, desto eher glaubt er jeden Scheiß.
  Mit Zitat antworten Zitat