program belazor var integer begin writeln Введите два слагаемых readln

1
2
3
4
5
6
7
8
9
program belazor;
var r,c:integer;
begin
writeln('Введите два слагаемых');
readln (r);
readln (c);
writeln('Сумма ',r, ' + ', c, ' равна ',r+c);
readln();
end.