TurboPascal задание с фигурой

[glow_deitu]

Всем ддобрый день. Вообщем не могу решить задачу, звучит так: "Определить принадлежит ли точка М(x,y) заданной фигуре: " фигуру добавил. Снимок.PNG Заранее спасибо.

[NetSpace]

вводим Mx=
вводим My=
//первая четверть 0-3 часа
если (X>=0) и (Y>0) то
начало
если (X<20)и(10<X)и(Y<20)и(10<Y) то принадлежит
конец
//вторая четверть 3-6 часов
если (X>=0)и(Y<0) то
начало
если(((Mx*Mx+My*My)^0.5)<=20)и(10<= ((Mx*Mx+My*My)^0.5)) то принадлежит
конец
//третья четверть 6-9 часов
если (X<=0)и(Y<0) то
начало
если((Mx*Mx+My*My)^0.5)<=20) то принадлежит
конец
//четвёртая четверть 9-12 часов
если(X<=0)и(0<Y) то
начало
если (-20<=X)и(Y<=20) то принадлежит
конец

[Аватар]

//первая четверть 0-3 часа
если (X>=0) и (Y>0) то
начало
если (X<20)и(10<X)и(Y<20)и(10<Y) то принадлежит
конец

Не правильно:

(x<=20) and (y<=20) and not ((x<10) and (y<10))

Дальше не смотрел

[NetSpace]

и почему это вдруг неправильно (X<20)и(10<X)и(Y<20)и(10<Y) ? у тебя просто исключаются точки оператором not, а у меня ограничиваются верхним и нижним пределом. я этот not вообще никогда не использовал и всё работало всегда...

[Аватар]

и почему это вдруг неправильно

{5,15} принадлежит фигуре. А по твоей формуле? По другим четвертям после беглого просмотра вроде правильно

PS моя формула без NOT такая будет (но с NOT прозрачней, для меня по крайней мере)

(x<=20) and (y<=20) and ((x>=10) or (y>=10))