Выяснить принадлежит ли точка с координатами (x, y)лежит ли точка с координатами (x, y), введенными с клавиатуры пользователем, заштрих - Pascal

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

Выяснить принадлежит ли точка с координатами (x, y)лежит ли точка с координатами (x, y), введенными с клавиатуры пользователем, заштрихованной области координатной плоскости. результат вывести на экран в форме принадлежит или не принадлежит. текст паскаль-программы должен содержать запрос на ввод значений переменных понятный пользователю, данные должны вводиться с клавиатуры. График: Дайте еще пожалуйста математическое описание!!! Для отчета!!!

Решение задачи: «Выяснить принадлежит ли точка с координатами (x, y)лежит ли точка с координатами (x, y), введенными с клавиатуры пользователем, заштрих»

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

uses crt;
var xmax,ymax,x,y,k:real;
begin
clrscr;
repeat
write('Введите максимальный по модулю интервал изменения по X xmax=');
readln(xmax);
until xmax>0;
repeat
write('Введите максимальный по модулю интервал изменения по Y ymax=');
readln(ymax);
until ymax>0;
writeln('Введите координаты точки x,y:');
readln(x,y);
k:=ymax/xmax;
if ((x>=-xmax)and(x<=0)and(y>=0)and(y<=k*x+ymax))
or((x>=0)and(x<=xmax)and(y<=0)and(y>=k*x-ymax))
then write('Точка принадлежит области')
else write('Точка не принадлежит области');
readln
end.

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

Создается переменная xmax и присваивается ей значение, введенное пользователем.
Создается переменная ymax и присваивается ей значение, введенное пользователем.
Создается переменная x и присваивается ей значение, введенное пользователем.
Создается переменная y и присваивается ей значение, введенное пользователем.
Вычисляется значение переменной k как отношение ymax к xmax.
Проверяется условие для принадлежности точки области:
- Если точка находится вне области, то выводится сообщение Точка не принадлежит области.
- Если точка находится внутри области, то выводится сообщение Точка принадлежит области.
Выводится сообщение с результатами проверки.
Запрашивается повтор ввода координат или выход из цикла.