Методы оптимизации и расчеты на ЭВМ технико-экономических задач. Ромашова О.Ю. - 136 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

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

Рубрика: 

136
))(min()(max
XFXF
−
−
=
,
сведем задачу поиска максимума функции
KPD к задаче минимизации
функции
KPD1, положив
KPD1 = –KPD.
Описание
функции KPD1 может быть следующим:
Function KPD1(P1,P2:real):real;
Uses TABL1;
Var P0,t0,Pk,t1,t2,... :real;
IMF : string [20]; {Описание имени файла}
{исходных данных }
F : text ; { Описание файла }
BEGIN { Начало функции }
IMF:=‘GRAD.ISH’; { Начало ввода исходных }
{ данных из файла}
Assign (F,IMF);
Reset (F);
Readln (P0);
Readln (to);
...
Close (F) ; { Конец ввода исходных }
{ данных из файла }
h0:=...
...
KPD:=... PD1:= – KPD; END. {Конец описания функции }
Вычисление частных производных КПД по давлениям
Обозначим градиент КПД
i
η
как
η
Gra
d
, а его составляющие по
давлениям
1
P и
2
P (производные) соответственно 1Gra
d
и 2Gra
d
.
Частная производная КПД по давлению
1
P
в точке с заданными
параметрами
),(
0
2
0
1
PP
приближенно может быть найдена
1
0
2
0
1
0
21
0
1
1
0
2
0
1
),(),(),(
1Grad
P
PPPPP
P
PP
iii
Δ
η−Δ+η
≈
∂
η∂
=
, (4.13)
где
0
11
)005,00001,0( PP ⋅−≈Δ – пробный шаг дифференцирования по
1
P .
Частная производная КПД по давлению
2
P в точке с заданными
параметрами
),(
0
2
0
1
PP
вычисляется аналогично:
2
0
2
0
12
0
2
0
1
2
0
2
0
1
),(),(),(
2Grad
P
PPPPP
P
PP
iii
Δ
η−Δ+η
≈
∂
η∂
=
, (4.14)
где
0
22
)005,00001,0( PP ⋅−≈Δ
– пробный шаг дифференцирования по
2
P .
Оформляем частные производные в виде функций на языке ПАС-
КАЛЬ.

Страницы