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

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

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

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

textual
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.

6   голосов, оценка 3.500 из 5


СОХРАНИТЬ ССЫЛКУ