написать программу опредения факта попадания точки M(x,y) в заштрихованную область

[Al'f!ra]

написать программу опредения факта попадания точки M(x,y) в заштрихованную область, изображенную на рисунке.
вроде задача не трудная, но у меня параболу описать ума не хватает

[Serge_Bliznykov]

информация к размышлению...

Как составить уравнение параболы

Википедия-Парабола

Анимационный ролик "Пересечение параболы с осями координат и приведенная форма"



а что будет, если построить график такой параболы:
y = (x^2 - 1.5) / 1.5 (или, что тоже самое Y=(2/3)*x^2 - 1 )

[Al'f!ra]

как строить параболу на практике я знаю, но как ее описать в паскале?

[Hacker19_90]

пфффф
ну напишите так
y = sqr(x) - 1

[Mad_Cat]

type TPoint = record
x,y:real;
end;

Function PointInArea(var p:TPoint):boolean;
var result:boolean;
begin
result:=false;
if (abs(p.x)>=1) and (p.y<=(sqr(x)-1))then result:=true;
if (p.y<=0) or (p.y>=5) then result:=false;
PointInArea:=result;
end;