Дана доска шириной 8 клеткой и длинной 8. Дана точка где стоит шахматный конь , и вводятся данные куда он сходил .Написать прогу которая будет выдавать может (true) так сходить конь или нет (false) — Pascal(Паскаль)

uses crt;
var
 a,b,c,d:byte;
begin
 clrscr;
 repeat
  writeln('Положение коня:');
  write('a=');
  readln(a);
  write('b=');
  readln(b);
 until (a in [1..8]) and (b in [1..8]);
 repeat
  writeln('Поле для хода:');
  write('c=');
  readln(c);
  write('d=');
  readln(d);
 until (c in [1..8]) and (d in [1..8]);
 if ((abs(a-c)=1)and(abs(b-d)=2)) or ((abs(a-c)=2)and(abs(b-d)=1)) then
  write('Конь может за один ход попасть на заданное поле')
 else 
  write('Конь не может за один ход попасть на заданное поле');
 readln
end.