Как решить задачу - Даны координаты двух полей шахматной доски. Координаты клетки - это два числа от 1 до 8: номер столбца и номер строки. Одного ли цвета эти клетки на шахматной доске? Надо сделать в Паскале

var x1,y1,x2,y2:integer; begin write('Первое поле:'); readln(x1,y1); write('Второе поле:'); readln(x2,y2); if ((x1+y1)mod 2)=((x2+y2)mod 2)  then writeln('Поля имеют одинаковый цвет')  else writeln('Поля имеют разный цвет'); end. Пример: Первое поле:2 3 Второе поле:7 5 Поля имеют разный цвет