Program P11;
label 1;
var a, b, c : integer;
begin
1:
writeln('Введите 2 числа');
read(a, b) ;
c:= a+b;
writeln('Сумма =', c);
goto 1;
end.
