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

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.