На шахматной доске в клетке с координатами x1, y1 находится слон. Определить, сможет ли он убить
фигуру, находящуюся в клетке x, y.Ответы на вопрос
// PascalABC.NET
// Версия 3.3.5 сборка 1662 (29.04.2018)
begin
var (x1, y1) := ReadInteger2('Координаты слона(x,y)->');
var (x, y) := ReadInteger2('Координаты фигуры(х,у)->');
Println(abs(x1 - x) = abs(y1 - y) ? 'Бьет' : 'Не бьет');
end.
Пример:
Координаты слона(x,y)-> 7 6
Координаты фигуры(х,у)-> 4 4
Не бьет
begin var (x,y):=ReadReal2('Координаты слона (х y):');
if not x.Between(1,8) or not y.Between(1,8) then begin
Writeln('Координата должна быть в пределах 1..8');
Exit
end;
var (x1,y1):=ReadReal2('Координаты фигуры (х y):');
if not x1.Between(1,8) or not y1.Between(1,8) then begin
Writeln('Координата должна быть в пределах 1..8');
Exit
end;
if Abs(x-x1)=Abs(y-y1) then Writeln('Можно убить')
else Writeln('Нельзя убить')
end.
Для того чтобы определить, сможет ли слон убить фигуру, находящуюся на клетке с координатами x, y, нужно проверить, лежат ли обе клетки на одной диагонали. Слон может двигаться только по диагонали, поэтому если клетки лежат на одной диагонали, это значит, что слон может атаковать фигуру.
Предположим, координаты слона находятся в клетке с координатами x1, y1, а фигура, которую нужно атаковать, находится в клетке x, y.
Для того чтобы определить, лежат ли две клетки на одной диагонали, нужно выполнить следующие условия:
- Разница между абсолютными значениями x и x1 должна быть равна разнице между абсолютными значениями y и y1.
Математически это можно записать как |x - x1| = |y - y1|.
Если это условие выполняется, то слон может атаковать фигуру в клетке с координатами x, y. В противном случае, слон не может достигнуть этой клетки ходом по диагонали.
Пример: Пусть слон находится в клетке с координатами x1 = 3, y1 = 4, и нужно проверить, сможет ли он атаковать фигуру в клетке x = 6, y = 7.
|6 - 3| = |7 - 4| 3 = 3
Условие выполняется, поэтому слон сможет атаковать фигуру в клетке с координатами x = 6, y = 7.
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
