Технический форум
Вернуться   Технический форум > Программирование > Форум программистов > Delphi, Kylix and Pascal


Ответ
 
Опции темы Опции просмотра
Старый 20.01.2021, 10:35   #1 (permalink)
Vladimir_S
Специалист
 
Аватар для Vladimir_S
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,775
Сказал(а) спасибо: 339
Поблагодарили 579 раз(а) в 207 сообщениях
Репутация: 112176
По умолчанию 2 ДаникQQ

Так-так, уважаемый...
По всему видать, взяли Вы курс на "получил задание на семестр"-"вывалил на форум"-"скатал"-"сдал".
НЕ ПОЙДЁТ!
Потому как в задачи нашего форума не входит плодить лоботрясов, а посему мой Вам совет: пока не поздно, беритесь за ум (собственный!) и осваивайте азы прикладной математики и программирования. А упустите время — и пойдёт обычное "спасите! помогите! отчисляют! сделайте мне за ночь курсовик!!!". Знаем. Проходили.
Но всё же попытаюсь Вам несколько облегчить жизнь.

1. Численное интегрирование. Задача рассматривалась неоднократно, например, здесь, правда, требуется поменять функцию и пределы. И ещё. Чтобы перейти от краевых к средним прямоугольникам, нужно в процедуре Rectangle заменить строку
Sum:=Sum+h*F(a+h*i);
на
Sum:=Sum+h*F(a+h*i+h/2);

2. Методы решения ОДУ 1-го порядка рассмотрены здесь. Подставляйте Вашу функцию и — вперёд!

3. Программу решения системы алгебраических уравнений можете взять отсюда. Отлажена и оттестирована.

4. В принципе, основные методы численного решения нелинейных алгебраических уравнений рассмотрены здесь, правда, Вегстейна там нет. Вообще, самостоятельное значение этого метода математиками оспаривается. Но Вы можете воспользоваться формулой, приведённой в данной ссылке, и, взяв за основу, например, "метод простой итерации", легко доработать программу. Замечу, что сначала нужно преобразовать исходное уравнение к виду
x = ψ(x),
затем построить график y(x), чтобы выбрать интервал с заведомо единственным корнем.

Дерзайте!
__________________
With Mozilla Firefox - straight to communism!
Vladimir_S вне форума   Ответить с цитированием
2 пользователя(ей) сказали cпасибо:
Daniellos (20.01.2021), prima (20.01.2021)
Старый 20.01.2021, 23:27   #2 (permalink)
кочевник
Member
 
Аватар для кочевник
 
Регистрация: 06.02.2011
Сообщений: 16,195
Сказал(а) спасибо: 1,043
Поблагодарили 1,810 раз(а) в 299 сообщениях
Репутация: 143777
По умолчанию

Цитата:
Сообщение от Vladimir_S Посмотреть сообщение
Но всё же попытаюсь Вам несколько облегчить жизнь.
Добрая ты душа, Владимир Игоревич! А я так и не могу себя пересилить и помогать очевидным бездельникам и нахлебникам. ))
кочевник на форуме   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.




Часовой пояс GMT +4, время: 16:16.

Powered by vBulletin® Version 6.2.5.
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.