Координаты точки в Delphi

[Владимир_король]

Вот задачка на координаты точки, помогите решить!!!

Вот условия:

Пусть x, y - координаты точки и u= 0, если (x, y) при-
надлежит D, u= x, в противном случае; область D есть промежуток
между полукругами x*x+y*y=1 и x*x+y*y=4, (y>=0).







Заранее благодарен ответам!!!

[Serge_Bliznykov]

if (y>=0) and ((sqr(x)+sqr(y))>=1) and ((sqr(x)+sqr(y))<=4) then u:=0
else u:=x;

p.s. точка, попавшая ровно на границу области (принадлежащая одному из полукругов) в данном случае считается, что принадлежит D. Если это не так, неравенства сравнения с 1 и 4 должны быть строгими (убрать знак равно).