Boolean39. Даны координаты двух различных полей шахматной доски $$x_1$$, $$y_1$$, $$x_2$$, $$y_2$$ (целые числа, лежащие в диапазоне 1–8). Проверить истинность высказывания: «Ферзь за один ход может перейти с одного поля на другое».
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
program Boolean39; var x1,y1,x2,y2: Integer; begin Write('Введите 1 координату 1 клетки шахматной доски: '); Readln(x1); Write('Введите 2 координату 1 клетки шахматной доски: '); Readln(y1); Write('Введите 1 координату 2 клетки шахматной доски: '); Readln(x2); Write('Введите 2 координату 2 клетки шахматной доски: '); Readln(y2); Writeln(((x1-x2)=(y1-y2)) or ((x1-x2)=(-1)*(y1-y2)) or (x1=x2) or (y1=y2)); end. |
Другие задачи из раздела Boolean можно посмотреть здесь.
Комментарии: