напишите два варианта программы которая вводит координаты точки на плоскости и определяет, попала ли эта точка в заштрихованную область. один вариант программы должен использовать сложные условия, второй-обходиться без них
а,в,з   СРОЧНО плиз

1)var x,y:real;beginread(x,y);if (x*x+y*y>4) and (y0) then writeln ('YES')else writeln('NO');end.3)var y,x:real;beginread(x,y);if ((y>x) and (y<2-x*x)) or ((y0) and (y<2-x*x)) then write('yes')else writeln('no');end.4)var y,x:real;beginread(x,y);if ((y<-x) and (y>x*x-2)) or((yx*x-2) ) then write('yes')else writeln('no');end.5)var y,x:real;beginread(x,y);if ((y>x) and (x*x+y*y<1)) or ((yelse writeln('no');end.6)var y,x:real;beginread(x,y);if ((x*x+y*y<1) and (y>x) and (y>-x)) or ((y-x)) or ((x*x+y*y<1) and (yelse writeln('no');end.7)var y,x:real;beginread(x,y);if ((y>1-x) and (x<1) and (y>2*X*X) and (y>0)) or((y>1-x) and (x<1) and (y<2*X*X) and (y>0) and (x>0)) then writeln('yes')else writeln('no');end.8)var y,x:real;beginread(x,y);if ((y<1) and (x>0) and (y>x-1)) or ((y<0) and (x*x+y*y<1) and (x>0) and (yelse writeln('no');end.9)var y,x:real;beginread(x,y);if ((x*x+y*y<1) and (y<1) and (x<1)) or ((x*x+y*y>1) and (x<1) and (y<1) and (x>0) and (y>0)) then writeln('yes')else writeln('no');end.