Question

помогите решить на паскале вариант 24

Answer 1

Ответ:

program Var24;

var x, y: real;

begin

   readln(x, y);

   if (sqr(x) + sqr(y) <= 4) then

       writeln('Принадлежит')

   else

       writeln('Не Принадлежит')

end.