Создайте программу содержащую ветвления и определяющую принадлежит ли точка с координатами (X, Y) заштрихованной области

Question

Информатика

Жаел

25 июня, 21:14

Создайте программу содержащую ветвления и определяющую принадлежит ли точка с координатами (X, Y) заштрихованной области

+2

Ответы (1)

Знаете ответ на вопрос?

Фаезжан · Answer 1

Var x, y: real;

begin

writeln ('Введите координаты точки x, y') ;

read (x, y) ;

if abs (x - 4) + abs (y - 4) < = 3 then writeln ('Принадлежит')

else writeln ('Не принадлежит')

end.