Даны вещественные числа x и y. Определить, принадле-
жит ли точка с координатами (x; y) заштрихованной части плос-
кости.
Как я понял, область ограничена четырьмя прямыми (в документе забыли ее заштриховать). Вот программа:
//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
var x,y:real;
begin
x:=ReadInteger(Введите координату x );
y:=ReadInteger(Введите координату y );
if (y>=-x-2) and (y<=x+2) and (y<=-x+2) and(y>=x-2) then
println(Принадлежит)
else println(Не принадлежит);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
