Ответы
Ответ дал:
0
var x,y : real;
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (x*x+y*y<=1)and(x>=0)or(y>=-x/2-1)and(y<=x/2+1)and(x<=0)
then writeln('Да')
else writeln('Нет')
end.
Пример:
x = -1
y = 0.4
Да
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (x*x+y*y<=1)and(x>=0)or(y>=-x/2-1)and(y<=x/2+1)and(x<=0)
then writeln('Да')
else writeln('Нет')
end.
Пример:
x = -1
y = 0.4
Да
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад