Плюсы Интернета:
- «стираются границы» общения. Мы можем не только общаться с людьми, которые живут в других странах, но и находить новых друзей;
- Интернет - это кладезь информации. При желании можно найти всё, что угодно;
- с Интернета можно смотреть фильмы, проводить онлайн-конференции, участвовать в семинарах, тренингах для повышения образования или саморазвития и т.д.;
Минусы
- с изобретением Интернета появилось понятие «интернет-зависимость»: жизнь виртуальная стала заменять жизнь реальную. В некоторых странах это проблема национального масштаба;
- ухудшение здоровья, в частности, зрения;
- развитие и рост киберпреступлений;
Объяснение:
const e=0.0001; // точность
var gold: real; // пропорция "Золотого сечения"
a,b: real; // начало и конец отрезка
x1,x2: real; // точки деления
y1,y2: real; // значения целевой функции в точках деления
function f(x:real):real; // целевая функция
begin
f:=x*x*x-8*x+1-5*sin(x);
end;
begin
gold:=(sqrt(5)+1)/2;
a:=-5;
b:=5;
repeat
x1:=b-((b-a)/gold);
x2:=a+((b-a)/gold);
y1:=f(x1);
y2:=f(x2);
if(y1<=y2) then a:=x1 else b:=x2; // условие - поиск максимума
until abs(y2-y1)<e;
writeln('max(',(x1+x2)/2:0:3,',',(y1+y2)/2:0:3,')'); // середина интервала
a:=-5;
b:=5;
repeat
x1:=b-((b-a)/gold);
x2:=a+((b-a)/gold);
y1:=f(x1);
y2:=f(x2);
if(y1>=y2) then a:=x1 else b:=x2; // условие - поиск минимума
until abs(y2-y1)<e;
writeln('min(',(x1+x2)/2:0:3,',',(y1+y2)/2:0:3,')');
End.
Объяснение:
Думаю код ясен.
f(X)=x*x*x-8*x+1-5*sinx
max(-1.612,14.703) min( 1.612,-12.703)
0