Page 14 - 4824
P. 14

1130 " ЗБІЛЬШИТИ ВМІСТ ЛІЧИЛЬНИКА ІТЕРАЦІЙ 1140 К
                            = К+1
                            1150 " ЗНАЙТИ СПРЯЖЕНИЙ НАПРЯМОК 1160
                            AK=G3*G3/(GK*GK)
                            1170 FOR I=1  ТО N:D(I)=—G(I)+AK*D(I) :P(I)=X(I) : NEXT I
                            1200 PRINT    "НОВИЙ    НАПРЯМОК"  :DV=DV+1 : PRINT
                            "ПОШУКУ" ; DV
                            1210 FP = Z:G1 = GO: GK = GO 1220 FOR   I=1   TO  N: PRINT
                            "U" ; I ; " = " ; X(I) : NEXT     I : PRINT
                            "R(U)=";Z 1230 GOTO 600 1250 PRINT "ПОВТОРИТИ
                            ПОШУК'"; : SV=SV+1 : DV=DV+1
                            1260 PRINT "ІТЕРАЦІЯ"; SV;" ПОШУК" ; DV
                            1270 PRINT
                            1280 GOTO 550
                            1300 PRINT "МІНІМУМ ЗНАЙДЕНО"
                            1320 FOR i=1 TO N: PRINT "U"I" = "X(I) : NEXT 1
                            1340 PRINT "МІНІМУМ ФУНКЦІЇ R(U)="Z
                            1350 PRINT "КІЛЬКІСТЬ ВИЧИСЛЕНЬ ФУНКЦІЇ
                            ДОРІВНЮЄ "TV
                            1400 END
                            2000 Z=100*(X(2)—Х(1)^2)^2+(1—Х(1))^2
                            2005 TV=TV+1
                            2010 RETURN
                            3000 GO = 0
                            ЗОЮ G(l)=—400*(X(2)—Х(1)Л2)*Х(1)—2*(1—X(l))
                            3020 G(2)=200*(X(2)—Х(1)Д2)
                            3030 FOR i = 1 TO N:GO = GO + G(I)^2:NEXT I
                            3040 GO = SQR(GO)
                            3050 RETURN

                                  КОНТРОЛЬНИЙ ПРИКЛАД
                            ВИКОРИСТОВУЮЧИ МЕТОД СПРЯЖЕНИХ ГРАДІЄНТІВ,
                            МІНІМІЗУВАТИ ФУНКЦІЮ РОЗЕНБРОКА R(U) =
                            100*(U2—U1^ Л2)Л2+(1—U1)  ^2 З ПОЧАТКОВОЮ
                            ТОЧКОЮ (—1.2,1).
                            МЕТОД СПРЯЖЕНИХ ГРАДІЄНТІВ ЧИСЛО ЗМІННИХ N =
                            2
   9   10   11   12   13   14   15   16   17   18   19