Zitat von
justloosit:
Delphi-Quellcode:
var a, b, c:integer;
strvar : String;
begin
writeln('Hallo dieses Programm berechnet ihnen die Summe, die Subtraktion, das Produkt');
writeln(', sowie die Division aus zwei Zahlen!');
writeln('Nun gib bitte deine erste Zahl ein.');
readln(a);
writeln('Deine erste Zahl ist also '+IntToStr(a)+' gib nun bitte deine zweite Zahl an!');
readln(b);
writeln('Deine Zahlen sind also '+IntToStr(a)+' und '+IntToStr(b)+' möchtest du fortfahren?');
readln(strvar);
if strvar 'Yes' then
writeln('Deine beiden Zahlen sind also '+IntToStr(a)+' und '+IntToStr(b));
writeln('die Summe der beiden Zahlen ist: '+IntToStr(a+b));
readln;
end.
Typenkonvertierung beachten.
readln(a) liest ein Integer ein - ausgeben kannst Du nur Strings
Grüße
Klaus