Студопедия

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника



Исходный код программы




Читайте также:
  1. II. Основные цели и задачи Программы, срок и этапы ее реализации, целевые индикаторы и показатели
  2. Автоматизированный перевод документов с помощью программы Promt
  3. Анализ продуктовой программы
  4. Анализ формирования и выполнения производственной программы
  5. Аннотация рабочей программы
  6. Аннотация рабочей программы
  7. Архитектура программы
  8. В. Этап контроля за реализацией маркетинговой программы
  9. Виды и условия оказания медицинской помощи в рамках программы государственных гарантий оказания гражданам РФ бесплатной медицинской помощи, нормативы объемов и финансовых затрат.
  10. Вирусы и антивирусные программы

CLS

PRINT "vvedite interval lokalizacii kornya"

INPUT "a=", a

INPUT "b=", b

eps = .000001

k = 0

fa = a ^ 2 – 6* a - 10

fb = b ^ 2 - 6* b - 10

IF fa * fb < 0 THEN GOTO 80

PRINT "oshibka v vybore intervala"

GOTO 100

80 x = (a + b) / 2

PRINT x

SLEEP 0

k = k + 1

fx = x ^ 2 - 6* x - 10

IF fx = 0 THEN GOTO 140

IF fa * fx < 0 THEN b = x: GOTO 130

a = x

130 IF ABS(b - a) > eps THEN GOTO 80

140 PRINT "x=", x

PRINT "f(x)=", fx

PRINT "k=", k

100 SLEEP 0

END


 

Результат работы программы

Находим первый корень

 

 

Находим второй корень

 

Вывод.

Как мы видим по результатам работы программы, были получены точки x=-1,359, x=7.359, что соответствует значению функции, когда f(x)=0 и значению функции в этой точке соответственно. Программа прошла 22 цикла. Следовательно, программа работает правильно, и полученные значения соответствуют действительности.


Задача №2. Поиск экстремумов функции методом перебора (сканирование интервала).

График


 


Дата добавления: 2015-02-10; просмотров: 5; Нарушение авторских прав







lektsii.com - Лекции.Ком - 2014-2021 год. (0.021 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав
Главная страница Случайная страница Контакты