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

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  var (a,b):=ReadInteger2('Введите два целых числа через пробел:');  if (a+b).IsEven then Writeln(a*b)  else Writeln(a/b)end.