Question

даны координаты коня на шахматном поле размером 8×88×8. требуется определить, какие клетки поля под его бой. формат выходных данных требуется вывести kk строк, где kk — количество клеток поля под боем коня. каждая строка должна содержать два целых числа — координаты клеток. строки должны быть по возрастанию первой координаты, если же они , по возрастанию второй. примеры: входные данные данные 1 8 6 7

Answer 1

// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017

begin
  var (a,b):=ReadInteger2('Введите координаты коня->');
  for var i:=1 to 8 do
   for var j:=1 to 8 do
    begin
     var x:=abs(i-a);
     var y:=abs(j-b);
     if ((x=1) and (y=2)) or ((x=2) and (y=1)) then Println(i,j);
    end;
end.

Пример:
Введите координаты коня-> 8 86 7 7 6