Определить принадлежность точки с координатами (x,y) заштрихованной области. Координаты точки вводятся пользователем.
В прикрепленном архиве программа, работает, определяет, НО область от (-5,0) до (0,5) не правильно определяеться.
Кусок проверки области:
Код:
begin //proveryaem prinadlezhnost'
if ((x>=-5) and (x<=0) and (y<=0) and (y+x>=-5)) \\ область от (0,-5) до (5, 0)
or ((x>=-5) and (x<=0) and (y>=0) and (y+x>=-1)) \\область от (-5,0) до (0,5)
or ((x<=5) and (x>=0) and (y<=sqrt(25-sqr(x))) and (y>=0)) \\область от (5, 0) до (0, 5)
then label5.Caption:= 'Принадлежит'
else label5.caption:= 'Не принадлежит';