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

Baka1111 Baka1111    3   05.06.2019 16:40    34

Ответы
qpdgjekelxnvi qpdgjekelxnvi  06.07.2020 06:08

var

   a, b: integer;

begin

   readln(a, b);

   if (a + b) mod 2 = 0 then

       writeln(a * b)

   else

       writeln(a / b);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика