По паскалю даны координаты двух различных полей шахматной доски х1, y1, x2, y2 (целые числа, лежащие в диапазоне 1-8). проверить истинность высказывания: «данные поля имеют одинаковый цвет». решить
var x1,y1,x2,y2:integer; begin readln(x1); readln(y1); readln(x2); readln(y2); if (x1+y1+x2+y2) mod 2 = 0 then writeln('ONI IMEUT ODINAKOVIJ ZVET'); else writeln('ONI IMEUT RAZNIJ ZVET'); end.
var
x1,y1,x2,y2:integer;
begin
readln(x1);
readln(y1);
readln(x2);
readln(y2);
if (x1+y1+x2+y2) mod 2 = 0 then
writeln('ONI IMEUT ODINAKOVIJ ZVET');
else
writeln('ONI IMEUT RAZNIJ ZVET');
end.