Алгоритмы с ветвлениями.(Delphi)

[flyfry]

Дана ограниченная область и точка A(x0, y0). Написать программу, которая проверяет, попадает ли точка с координатами пользователя в заданную область. Нарисовать и область, и точку на экране.
---------------------------------------------------------------
Помогите пожалуйста с задачей(советом).
я вот накалякал тут немного, но почему то в полной уверенности что это вообще не в тему

var x,y :integer;
    a: double;
begin
x:=StrToInt(Edit1.Text);
y:=StrToInt(Edit2.Text);
a:=x*x+y*y;
if (y>=x*(-1)) and (y<=x) and (y<=a)
  then
  begin
  ShowMessage('попадает в область');
  end
  else
  ShowMessage('не попадает в область');
end;

end.

[Utkin]

Чего-то я область не увидел. Область в данном случае что? Окружность?

[flyfry]

Я файл прикрепил на нем отмеченна заштрихованная область.
область образуют: окружность с радиусом "а"
и две прямые y=-x; y=x;