Задать вопрос

Запишите if then else для решения задачи: найти сумму s двух чисел m и n, если эти числа равны, в противном случае найти r - - разность m и n

+2
Ответы (1)
  1. 1 декабря, 20:46
    0
    Program pr1;

    VAR m, n, s, r: Real; {Если вдруг пользователь введет не целое число}

    BEGIN

    Readln (m, n);

    if (m=n) then begin S:=m+n; Write (s); end;

    else begin r:=m-n; Write (r); end;

    END.
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Запишите if then else для решения задачи: найти сумму s двух чисел m и n, если эти числа равны, в противном случае найти r - - разность m и ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы
Похожие вопросы информатике