РАЗВЕТВЛЯЮЩИЙСЯ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС

[Koketkaa]

Помогите пожалуйста
Пусть D - заштрихованная часть плоскости (см. рис. 3) и пусть задана точка своими координатами (X,Y). Запись (X,Y) D означает, что точка с координатами X, Y лежит внутри заштрихованной области D. Определить значение функции U следующим образом:
U = 0, если (X,Y) D,
X, в противном случае

[vova_]

U:=x
if y>0 then begin
            if ((x^2+y^2)^(1/2)) <=2 then begin
                                          if ((x^2+y^2)^(1/2)) >=1 then U:=0;
                                          end;
             end;