Question

Написать программу Попадёт ли точка в заданную область

Answer 1

var
Begin
  if (x<=0) and (y<=0) and (sqr(x)+sqr(y)<=1) or (sqr(x)+sqr(y)<=1) and (y>=0)         then write('Yes')
  else write ('No');
end.
 

Answer 2

var x,y:integer

Answer 3

Забыла.