Оптимизация химико-технологических процессов органического синтеза. Бочкарев В.В - 71 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

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

Рубрика: 

71
1300 PRINT "Минимум найден"
1310 PRINT "Количество итераций="; CC; "значение минимума="; Z
1320 FOR I = 1 TO N
1330 PRINT "X"; I, X(I)
1340 NEXT I
1350 END
5000 Z = 0
5010 Z = 3 * (X(1) - 1) ^ 2 + 2 * (X(2) - 2) ^ 2 + (X(3) - 3) ^ 2
5100 TT = TT + 1
5200 RETURN
6000 G0 = 0
6100 GL(1) = 6 * (X(1) - 1)
6200 GL(2) = 4 * (X(2) - 2)
GL(3) = 2 * (X(3) - 3)
7000 FOR I = 1 TO N: G0 = G0 + GL(I) * GL(I): NEXT I
7010 G0 = SQR(G0)
7500 RETURN
Приложение3
Программа нахождения минимума функции нескольких переменных
z=f(x1,x2,...,xn) симплексным методом Нелдера-Мида [11]
CLS
20 PRINT "Симплексный метод Нелдера-Мида"
40 PRINT "Нахождение минимума функции F(x1,x2,...xn)"
60 PRINT "Функция Z=F(x1,x2,...xn) вычисляется в строке 5000"
80 PRINT "В данном методе используется деформированный симплекс"
tev = 0
100 PRINT "Введите число переменных"
120 INPUT n
140 PRINT " Начальное приближение"
150 PRINT "Введите координаты начальной точки"
160 DIM s(n + 1, n)
180 FOR j = 1 TO n
PRINT "x"; j; : INPUT s(1, j)
220 NEXT j
Nitro PDF Trial
www.nitropdf.com

Страницы