R=(x2)×(yc)r3
Объяснение:
Менің түсінгенім бойынша осылай
В Паскале можно решить так:
var
x, y :real;
begin
write('x= ');
read (x);
write('y= ');
read (y);
if ((x*x+y*y<=4*4) and (x<=0)) or ((x*x+y*y<=8*8) and (x>=0))
then write('принадлежит')
else write('не принадлежит');
end.
R=(x2)×(yc)r3
Объяснение:
Менің түсінгенім бойынша осылай
В Паскале можно решить так:
var
x, y :real;
begin
write('x= ');
read (x);
write('y= ');
read (y);
if ((x*x+y*y<=4*4) and (x<=0)) or ((x*x+y*y<=8*8) and (x>=0))
then write('принадлежит')
else write('не принадлежит');
end.