Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Напишите два варианта программы(2 не обязательно),которая вводит координаты на плоскости и определяет,попала ли эта точка в заштрихованную область.

Ответ оставил Гость

Var X,Y:real;
Begin
Write(X = );Read(X);
Write(Y = );Read(Y);
if (X*X+Y*Y=1)or( (X>=0)and(Y>=0)and(X<=1)and(Y<=1) ) then Write(Попала)
else Write(Мимо)
End.