ПАСКАЛЬ

Даны координаты двух различных полей шахматной доски х1, y1, x2, y2 (целые числа, лежащие в диапазоне 1-8). Проверить истинность высказывания: «Король за один ход перейдёт с одного поля на другое».

Почему вы решаете через abs?

program gt;var x1,x2,y1,y2:integer;beginreadln(x1,y1,x2,y2);if  ((abs(x1-x2)<=1)and(abs(y1-y2)<=1))then writeln('YES')elsewriteln('NO');end.