Выяснить, можно ли с поля (k ,l) одним ходом ладьи попасть на поле (m, n) - PascalABC.NET

Формулировка задачи:

Поле шахматной доски определяется парой натуральных чисел, каждое из которых не превосходит восьми: первое число — номер вертикали (при счете слева направо), второе — номер горизонтали (при счете снизу вверх). Даны натуральные числа k, l, m, n, каждое из которых не превосходит восьми. 1) Выяснить, можно ли с поля (k ,l) одним ходом ладьи попасть на поле (m, n). Если нет, то выяснить, как это можно сделать за два хода.(Указать поле, на которое приведет первый ход.) 2)Аналогично, но ладья заменяется на ферзя.

Решение задачи: «Выяснить, можно ли с поля (k ,l) одним ходом ладьи попасть на поле (m, n)»

Листинг программы

var
  k,l,m,n:integer;
begin
  write('1) Введите координаты ладьи:');
  readln(k,l,m,n);
  if (k=m) or (l=n)then writeln('Можно!') else 
  writelnformat('первый ход {0}:{1}-{2}:{1}; второй ход {2}:{1}-{2}:{3}',k,l,m,n);
end.

Объяснение кода листинга программы

1) Ввод координат ладьи с помощью функции readln(k,l,m,n). 2) Проверка условия: если k=m или l=n, то выводится сообщение Можно!. 3) Иначе выводится сообщение с двумя ходами ладьи, представленные в виде: первый ход {0}:{1}-{2}:{1}; второй ход {2}:{1}-{2}:{3}, где {0} - значение переменной k, {1} - значение переменной l, {2} - значение переменной m, {3} - значение переменной n.