Оптимизация технологических процессов. Часть 1. Метод Лагранжа и численные методы безусловной оптимизации функции одной переменной. Асламова В.С - 78 стр.

UptoLike

ВУЗ: 

АГТА | Ангарск

Составители: 

Рубрика: 

else begin {определение подинтервала,
содержащего точку минимума
функции f(x)}
if f4<f2 then
begin
if f4<f2 then
begin
x3:=x2; f3:=f2
end
else begin
x1:=x4; f1:=f4
end;
x2:=x4; f2:=f4;
end
else
if x4>x2 then
begin
x3:=x2; f3:=f2;
end
else begin
x1:=x4; f1:=f4
end;
end;
end;
untiL abs(R)<eps;
Writeln('x=',x2:15:10,'min f=',f(x2):15:10,
'Df/Dx=',pr(x2):15:10,'N=',N);
end.
Приведем результаты работы программы при различных eps:
eps
х
*
f (х
*
) f '(х
*
)
N
1E-2
1E-4
1E-6
1E-8
1E-9
2,999582
3
3
3
3
36,999998
-37
-37
-37
-37
-0,005009
0
0
0
0
2
4
5
8
11
78 
       else begin {определение подинтервала,
                    содержащего точку минимума
                    функции f(x)}
        if f4x2 then
            begin
             x3:=x2; f3:=f2;
            end
            else begin
             x1:=x4; f1:=f4
            end;
       end;
     end;
  untiL abs(R)

Страницы