Одномерная оптимизация (Вариант 16)

Проверим выполнение аналитического условия унимодальной функции на выбранном отрезке
<br>теоретическая длина отрезка неопределенности после трех итераций
<br>Проведем ручной расчёт трёх итераций по методу Дихитомии
<br> - параметр метода для ручного расчета
<br>Решение задачи оптимизации с точностью Е = 0,0001 с использованием программы
<br>DECLARE FUNCTION f! (x AS SINGLE)<br>CLS<br>PRINT "Vvedite otrezok neopredelennosti [a,b]"<br>INPUT " a - ", a<br>INPUT " b - ", b<br>INPUT "Tochnost vichisleniya:"; E<br>INPUT "Parametr metoda:"; d<br>PRINT<br><br> x2 = (a + b + d) / 2<br> IF f(x1) > f(x2) THEN<br> a = x1<br> ELSE<br>FUNCTION f! (x AS SINGLE)<br>f = SIN(EXP(x)) - EXP(-x) + 1<br>END FUNCTION<br><br>DECLARE FUNCTION f! (x AS SINGLE)<br>CLS<br>PRINT "Vvedite otrezok neopredelennosti [a,b]"<br>INPUT " a - ", a<br>INPUT " b - ", b<br>INPUT "Tochnost vichisleniya:"; E<br><br>xz = (a + b) / 2<br>fz = f(xz)<br>PRINT "****************************************************************************"<br>PRINT "Tochka maksimuma: x="; xz; "f="; fz<br>END<br><br>FUNCTION f! (x AS SINGLE)<br>f = SIN(EXP(x)) - EXP(-x) + 1<br>END FUNCTION

СПИСОК ЛИТЕРАТУРЫ
<br>1. Банди Б. методы оптимизации. – М.: Радио и связь, 1988. – 128 с.
<br>2. Мельникова О.И., Бонюшкина А.Ю. Начала программирования на языке Qbasic: Учебное пособие = М.: Издательство ЭКОМ, 2000 – 304 с., ил.
<br>3. Бирюков С.И. Оптимизация. Элементы теории. Численные методы: Учеб. пособие. — М. : МЗ-Пресс, 2003. — 248с. : рис. — (Серия "Естественные науки). — Библиогр.: с. 245-246.
<br>4. Волков Е.А. Численные методы: Учеб. пособие. — 3.изд., испр. — СПб. ; М. ; Краснодар : Лань, 2004. — 248с. : рис., табл. — (Учебники для вузов). — Библиогр.: с. 244.