Принадлежность точки заданной области - QBasic

Формулировка задачи:

Здравствуйте. Столкнулся с проблемой определения принадлежности точки в области. Собсна сам код:

                    Листинг программы
                
 
                        
                          
                    
CLS
SCREEN 12
INPUT "Vvedite X:", x
INPUT "Vvedite Y:", y
PRINT "5zad"
LINE (200, 280)-(300, 220), 12
LINE (200, 220)-(300, 160), 12
LINE (200, 280)-(200, 220), 12
LINE (300, 220)-(300, 160), 12
LINE (400, 220)-(100, 220), 12
LINE (270, 320)-(270, 50), 13
 
Flag = 1
IF SQR((y - 5) ^ 2 + x * x) < 3 THEN Flag = 0
IF SQR( y * y + y * y) > 8 THEN Flag = 0
LOCATE 22, 35
PRINT "Tochka"

Совсем запутался! Выручайте!

Решение задачи: «Принадлежность точки заданной области»

Листинг программы

CLS
INPUT "X = "; x
INPUT "Y = "; y
 
SCREEN 11
WINDOW (-16, 12)-(16, -12)
 
LINE (0, -9)-(0, 9)
LINE (-12, 0)-(12, 0)
LINE (-8, 0)-(4, 9)
LINE (-8, -9)-(4, 0)
LINE (-8, 0)-(-8, -9)
LINE (4, 0)-(4, 9)
 
CIRCLE (x, y), .2
 
z = .75 * x
IF y <= z + 8 AND y >= z - 3 AND x <= 4 AND x >= -8 THEN
   PRINT "YES"
ELSE
   PRINT "NO"
END IF
END

Объяснение кода листинга программы

Происходит считывание координат X и Y с помощью функции INPUT.
Координаты X и Y сохраняются в переменных x и y соответственно.
Открывается окно с помощью команды SCREEN 11.
Определяются границы окна с помощью команды WINDOW.
Рисуются линии для создания заданной области с помощью команды LINE.
Рисуется окружность с центром в точке (x, y) и радиусом 0,2 с помощью команды CIRCLE.
Вычисляется значение переменной z как 0,75*x.
Проверяется принадлежность точки (x, y) к заданной области с помощью условия IF.
Если точка принадлежит области, выводится сообщение YES.
Если точка не принадлежит области, выводится сообщение NO.