1.
program tochki1;
uses crt;
var
x,y: real;
begin
writeln('Введите координаты точки:');
write('x='); readln(x);
write('y='); readln(y);
writeln('Please wait...');
  if (y<=1) and (y>=cos(x)) and (y>=0) and (x>=0) then
    begin
      writeln('Точка (',x,',',y,') принадлежит заштрихованной области ');
    end
else
    writeln('Точка (',x,',',y,') не принадлежит заштрихованной области ');
end.

2.
program tochki2;
uses crt;
var
x,y: real;
begin
writeln('Введите координаты точки:');
write('x='); readln(x);
write('y='); readln(y);
writeln('Please wait...');
  if (y>=x*x) and (y<=2-x) then
    begin
      writeln('Точка (',x,',',y,') принадлежит заштрихованной области ');
    end
else
    writeln('Точка (',x,',',y,') не принадлежит заштрихованной области ');
end.

0 0

3 года назад

Сад разбит на одинаковые квадраты, две улитки быстрая и медленная ползут вдоль забора сада .они начали двигаться одновременно из

olga101vn [196]

С наверное, может быть правильно
как

0 0

4 года назад