посчитайте Нужно написать программу на Паскале Тема: проверка попадания в заданную область точки. Вариант 28.

var x,y:real;

begin

write('Введите x: '); readln(x);

write('Введите y: '); readln(y);

write((abs(y) <= sqrt(abs(4-sqr(x)))) and (abs(y) >= 1) and (abs(x) <= sqrt(3)))

end.