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.
3/10y-8/15y=0.78-1.2
(45-80)y/150=-0.42
35y=63
Y=1.8
15 - 9 = 6 м. на столько первый моток больше второго.
258 : 6 =43 р. стоит 1 м. кружева.
15 х 43 =645 руб. стоит первый моток.
9 х 43 = 387 руб. стоит второй моток.