Автор - nik2004ita3
program calculator;
var
a,b,c:integer;
begin
Writeln ('введите число a:');
readln(a);
Writeln ('введите число b:');
readln(b);
c:=a+b;
writeln('ответ: ',c);
end.