Выполни задание

Требовалось написать программу, при выполнении которойс клавиатуры вводятся координаты \(x\) и \(y\) точки на плоскости и определяется принадлежность этой точки закрашеннойобласти единичной окружности:

Программист торопился и написал программу с ошибками:

var x, y: real;

begin

readln(x,y);

if x*x+y*y \(\lt =1\) then

if y \(\lt=\) 0 then

if x \(\lt\) 0 then

write('принадлежит')

else

write('не принадлежит')

end.

Выясни, как работает программа при значениях \(x\) и \(y\) ,принадлежащих областям \(A\) , \(B\) , \(C\) , \(D\) , \(E\) , \(F\) , \(G\) , \(H\) . Анализпрограммы проведи, заполнив таблицу:

Предложи свой вариант программы, исключающий случаи её неправильной работы.