program zz1;
var a, b, r, i:integer; // задаем переменные целого типа
begin
write(' введите первое число '); // вводим с клавиатуры первое число
read(a);
write(' введите второе число '); // вводим с клавиатуры второе число
read(b);
r:= a + b; // высчитываем сумму двух введенных с клавиатуры чисел
i:= a - b; // высчитываем разность двух введенных с клавиатуры чисел
writeln(' сумма двух чисел ', a,' + ',b,' = ', r); // выводим ответ
write(' разность двух чисел ',a,' - ',b,' = ', i);
end.