Вопрос, который вызвал трудности
Вычислить сумму и разность двух целых чисел вводимых с клавиатуры(Программа Паскаль) Пожалуйста, нужно очень срочнооооо
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Var
a,b,r,s: integer;
begin
readln (a,b);
if a>b then r:=a-b
else r:=b-a;
s:=a+b;
writeln ('Сумма равна: ',s,' Разность равна: ',r);
end.