Студопедия


Авиадвигателестроения Административное право Административное право Беларусии Алгебра Архитектура Безопасность жизнедеятельности Введение в профессию «психолог» Введение в экономику культуры Высшая математика Геология Геоморфология Гидрология и гидрометрии Гидросистемы и гидромашины История Украины Культурология Культурология Логика Маркетинг Машиностроение Медицинская психология Менеджмент Металлы и сварка Методы и средства измерений электрических величин Мировая экономика Начертательная геометрия Основы экономической теории Охрана труда Пожарная тактика Процессы и структуры мышления Профессиональная психология Психология Психология менеджмента Современные фундаментальные и прикладные исследования в приборостроении Социальная психология Социально-философская проблематика Социология Статистика Теоретические основы информатики Теория автоматического регулирования Теория вероятности Транспортное право Туроператор Уголовное право Уголовный процесс Управление современным производством Физика Физические явления Философия Холодильные установки Экология Экономика История экономики Основы экономики Экономика предприятия Экономическая история Экономическая теория Экономический анализ Развитие экономики ЕС Чрезвычайные ситуации ВКонтакте Одноклассники Мой Мир Фейсбук LiveJournal Instagram

End Sub. Пример 15.3.Составить программу вычисления по следующей итерационной формуле yi+1=0,5(yi + x/yi) с заданной точностью Е=0.001, начальным приближением y0=1 и




Пример 15.3.Составить программу вычисления по следующей итерационной формуле yi+1=0,5(yi + x/yi) с заданной точностью Е=0.001, начальным приближением y0=1 и х=25 . В циклическом алгоритме (глава 10, рис. 10.7) выполним замену переменных : Уi обозначим переменной а

Уi+1 обозначим переменной b

Тогда запишем а=уо ; b=0.5(a+x/a); ; a=b; Вывод b

Процедура отклика командной кнопки с использованием оператора If:

Private Sub CommandButton1_Click()

Dim e, x, yo, a, b As Single

e = 0.001: yo = 1: x = 25

a = yo

2: b = 0.5 * (a + x / a)

If Abs(b - a) < e Then GoTo 1

a = b

GoTo 2

1: MsgBox " b= " & b





Дата добавления: 2014-01-24; просмотров: 458; Опубликованный материал нарушает авторские права? | Защита персональных данных | ЗАКАЗАТЬ РАБОТУ


Не нашли то, что искали? Воспользуйтесь поиском:

Лучшие изречения: Для студентов недели бывают четные, нечетные и зачетные. 9083 - | 7290 - или читать все...

Читайте также:

  1. I. Социальная сущность войны и ее взаимосвязь с политикой на примере уроков Второй мировой войны
  2. Абсолютная монархия. В ХVI в. в Германии проходила реформация, сопровождавшаяся крестьянскими восстаниями, например крестьянской войной 1525 г. Реформация разъединила государство
  3. АГРИКУЛЬТУРА СРЕДНЕВЕКОВЬЯ И ЭПОХИ ВОЗРОЖДЕНИЯ. почвах. Как пример чертеж участка земли по р. Сетунь представлен на ри­сунке 67
  4. Аналитический способ вычисления потока
  5. Аннотированных учебных элементов. Биохимические методы - методы, которые помогают обнаружить ряд заболеваний обмена веществ при помощи, например, исследования биологических жидкостей (крови,
  6. АНТИЧНАЯ АГРИКУЛЬТУРА. рии Александра Македонского была невелика. Например, многие жители ог­ромного Вавилона даже через несколько дней после победоносного вступле­ния Александра в
  7. АНТИЧНОСТЬ. мраморе, например в Геркулануме, копируют классические образцы. В большом количестве со­хранилис
  8. Апреля 2011 года Степа, Митя и Женя собираются окончательно покорить Москву, представив полноценную live-программу в клубе Milk, одном из крупнейших клубов столицы
  9. Ая, 2-ая, 8-ая и 16-ая системы как примеры позиционных систем
  10. Бодров Ю.И. Лекции по хирургии.. Данный тип заболевания возникает в результате выхода внутренних органов, например сальника или кишечника за пределы брюшной полости через дефекты в области
  11. Были обнаружены трупы четырех гуманоидов, которых взрывом отбросило примерно на 2 мили к востоку от места катастрофы. Трупы сильно разложились и изъедены дикими животными


 

3.94.196.192 © studopedia.ru Не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования. Есть нарушение авторского права? Напишите нам | Обратная связь.


Генерация страницы за: 0.002 сек.