Принадлежит ли точка заданому полю?

[Katmai]

Условие- Проверить, находится ли точка с координатами в области показаной на рисунку ?
Доп. задание, условие записать одним выражением !!!

Уравнение пораболы - y=1-x^2;

Вот мое решение:

var x,y:real;
begin
writeln('vvodim x,y');
readln(x,y);
if (sqr(x)+sqr(y-1)+sqr(x)+(y-1))<1 then writeln('vxodit') 
else writeln(ne vxodit);
readln;
end.

или без -1 нужно запписать?
(sqr(x)+sqr(y-1)+sqr(x)+(y-1))<1


Помогите !

[Somebody]

(sqr(x) + sqr(y - 1) < 1) and (y < 1 - sqr(x))

[Katmai]

Дополнительное задание записать все в ОДНО выражение !!!

(sqr(x) + sqr(y - 1) < 1) and (y < 1 - sqr(x)) === (sqr(x)+sqr(y-1)+sqr(x)+y<1 ???

Я просто не пойму правельно я сделал ?

[Stilet]

аписать все в ОДНО выражение

В каком смысле в одно? Разве Somebody дал в двух выражениях?

[Katmai]

Мне сегодне уже пояснили, спасибо !