Question

написать программу в паскале ,помогите умоляю
Поле шахматной доски определяется парой – буква и цифра. Буква (a … h)
означает горизонталь при счете снизу вверх, число (1 … 8) – номер вертикали при счете слева
направо. Даны два натуральных числа K,M, не превышающие восьми, и два символа x,y.
Требуется выяснить, если на поле (K, x) стоит ладья, угрожает ли она полю (M,y)?

Answer 1

Ответ:

pascal

Объяснение:

program ladya;

var

 K, M: integer;

 x, y: string;

begin

 Write('Введите числа К и М (от 1 до 8): ');

 ReadLn(K);

 ReadLn(M);

 Write('Введите буквы x и y (от a до h): ');

 ReadLn(x);

 ReadLn(y);

 if (K = M) or (x = y) then

     WriteLn('Ладья на поле ',x,K,' угрожает полю ',y,M)

 else

     WriteLn('Ладья на поле ',x,K,' не угрожает полю ',y,M);

end.