Даны координаты поля шахматной доски x, y. Проверить истинность высказывания: «Данное поле является белым»

Даны координаты поля шахматной доски x, y (целые числа, лежащие в диапазоне 1–8). Учитывая, что левое нижнее поле доски (1, 1) является черным, проверить истинность высказывания: «Данное поле является белым».

Program Boolean34;
Var
x,y:Integer;
Begin
ReadLn(x,y);{если (y+x) mod 2=0 то поле черное, иначе - поле белое}
WriteLn(Not ((y + x) Mod 2 = 0));
end.

автор: Sklyarov Sergej a.k.a. S9