• Дано два числа.если числа четны,то вычислите их произведение,если числа не четны,то их сумму,в остальных случаях вычислите

Ответы 1

  • program  even_odd;

    var a, b: integer;

     begin

    write(\'Введите два числа через пробел \');

    read(a,b);

    case (a mod 2) + (b mod 2) of

    0: writeln(a, \' * \', b, \' = \', a * b);

    1: writeln(a, \' - \', b, \' = \', a - b);

    2: writeln(a, \' + \', b, \' = \', a + b);

    end

    end.

    • Автор:

      lucia
    • 3 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years