Question

Составить программу Pascal: Проверить , кратно ли 2 сумма двух натуральных чисел .

Answer 1

var

  a, b : integer;

begin

  read (a, b);

  if (a + b) mod 2 = 0 then writeln ('Yes') else writeln ('No');

end.