, описываемые логическими выражениями QBASIC

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

Помогите с функциями,Заранее спасибо. Для данных областей составить линейную программу, которая печатает true, если точка с координатами (х, у) принадлежит закрашенной области, и false — в противном случае:

Решение задачи: «, описываемые логическими выражениями QBASIC»

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

CLS
DIM A(-1 TO 0) AS STRING
A(-1) = "TRUE"
A(0) = "FALSE"
 
INPUT "X,Y = "; x, y
 
z = y <= 4 AND y >= ABS(x) AND NOT x ^ 2 + y ^ 2 < 16
 
PRINT A(z)
END

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

CLS - очистка экрана
DIM A(-1 TO 0) AS STRING - создание массива A размером -1 строка, где -1 - признак конца строки, 0 - размер строки, AS STRING - тип данных массива A, равный строковому типу
A(-1) = TRUE - присваивание значений массиву A, где -1 элементу присваивается значение TRUE
A(0) = FALSE - присваивание значений массиву A, где 0 элементу присваивается значение FALSE
INPUT X,Y =; x, y - запрос ввода координат X и Y с помощью функции INPUT, где введенные значения присваиваются переменным x и y
z = y <= 4 AND y >= ABS(x) AND NOT x ^ 2 + y ^ 2 < 16 - присвоение значения переменной z, которое представляет собой результат логического выражения, включающего в себя условия, связанные с введенными координатами
PRINT A(z) - вывод значения переменной z на экран с помощью функции PRINT, где значение переменной z соответствует номеру строки в массиве A, где хранится результат логического выражения