Задать вопрос
27 июля, 12:27

Ввести два числа. Если сумма этих чисел четная, найти произведение, в противном случае, найти частное этих чисел.

+5
Ответы (1)
  1. 27 июля, 15:08
    -2
    Program i2;

    var

    a, b: integer;

    begin

    readln (a. b);

    if (a+b) mod 2=0 then

    writeln (a*b)

    else

    writeln (a/b);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Ввести два числа. Если сумма этих чисел четная, найти произведение, в противном случае, найти частное этих чисел. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы