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

Question

Информатика

Апетнах

6 ноября, 14:13

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

+5

Ответы (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.