var a, b: integer;
begin
readln(a); readln(b);
write('Сумма= ',a+b)
end.
ИЛИ
var a, b, sum: interger;
sum:=a+b;
writeln('Сумма= ',sum);
var a, b: integer;
begin
readln(a); readln(b);
write('Сумма= ',a+b)
end.
ИЛИ
var a, b, sum: interger;
begin
readln(a); readln(b);
sum:=a+b;
writeln('Сумма= ',sum);
end.