|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.09.2011, 22:59 | #1 |
Регистрация: 14.04.2011
Сообщений: 5
|
Решение нелинейных уравнений методом секущих.
Уравнение: x + 2tg(0.5x²) = 0.6
Локализацию корней проводить с шагом 0.1 начиная от нуля. Есть часть программы: Program st3; var t:text; x1,x2,k:real; function f(x:real):real; begin f:= x+2tg(0.5*sqr(x))-0.6; end; begin assign(t,'c\program files\st3.txt'); rewrite(t); x1:=0.1; while f(x1)*f(x1+0.1)>0 do x1:=x1+0.1; writeln(t,x1:6:2); repeat x1:= ?????... Вот не знаю что дальше |
20.09.2011, 19:37 | #2 |
Форумчанин
Регистрация: 19.03.2010
Сообщений: 409
|
во 1 первых нужно до цикла задать 2 начальных значения, по вашей задаче это видимо будут 0 и 0.1. Далее в цикле вам нужно написать формулу метода секущих, в которой каждый раз вычисляется новое значение х1 на основе 2 предыдущих. И вычисления проводить до тех по пока не буде достигнута заданная точность, т.е. модуль разницы между вновь вычисленным значение и предыдущим станет меньше допустим 1е-6
Есть вопросы, пишите в ЛС.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Решение нелинейных уравнений методом хорд и методом простой итерации(С++) | Foralberg | Помощь студентам | 9 | 31.01.2011 01:33 |
Решение нелинейных уравнений методом хорд на Delphi 6 или 7 | Vovanella | Помощь студентам | 1 | 06.12.2010 22:36 |
Решение нелинейных уравнений методом Ньютона (касательных) | Veina | Помощь студентам | 1 | 10.11.2010 18:29 |
Решение нелинейных уравнений методом хорд, pascal | Антонова Анна | Помощь студентам | 3 | 09.12.2007 19:24 |