Решение нелинейных уравнений методом Ньютона - Pascal

  1. Помогите решить 0,1sin(x)+x^2-1=0 С точностью Е=10^-4 Интервал изоляции [0,8;1,0] Зарание спасибо!

textual

Код:

var x, xn: real;
begin
  x := 1;
  repeat
    xn := x;
    x := xn - (0.1 * sin(x) + x * x - 1) / (0.1 * cos(x) + 2 * x)
  until abs(x - xn) < 1e-4;
  write('x = ', x:0:4);
  readln
end.

Блок-схема:

Блок-схема к задаче: Решение нелинейных уравнений методом Ньютона - Pascal

Похожие ответы
  1. Методом Ньютона уравнение решил. Не работает метод половинного деления.

  1. ex + ln x - 10 x = 0 Отрезок содержащий корень: [3;4] Подскажите, в какую сторону копать?Добавлено через 2 часа 3 минуты Получилось вот что:

  1. имеется исходник программы для решения методом Ньютона (метод касательных), требуется видоизменить для получения исходника под модифицированый метод Ньютона (метод секущих) - что именно и на что?

  1. решить методом касательных(метод ньютона). на промежутке (1;3)

  1. Решить при помощи численных методов уравнение (найти действительные корни) указанным методом, составить блок-схему. x^3+3x^2-24x+1=0 метод хорд, Ньютона;

  1. Условие задачи: Найти одним из методов с точностью е=0,0001 действительные корни уравнения ( метод биссекции, метод Ньютона, метод итерации или метод секущих. Уравнение: 3х-cosx-1=0 Кто может это решить помогите пожалуйста переделать в исходник:

  1. ВОт короче такое дело. НУжна прога которая решает систему нелинейных уравнений методом Ньютона. ПРога есть. ВОт:

  1. Вообщем нужно написать программу на паскале, которая решает систему нелинейных алгебраических уравнений и строит графики. Программа по большому счёту уже сделана, но есть небольшие косяки. Поэтому и прошу помочь. Задание: графически и численно решить систему нелинейных алгебраи-ческих уравнений, на примере поиска точек пересечения двух функций. Исходные данные: график строится по исходным данным, определяемым в виде констант в программе: а) координаты верхнего левого угла прямоугольника, в котором должен быть расположен график; б) размеры прямоугольника; в) количество линий координатной сетки по каждой из осей; г) диапазон изменения аргумента; Вот исходники (вместе со всеми модулями):8.rarА вот так должна в идеале выглядеть эта программа:res.rar Модули Consts, Types, Draw1 и Mathem1 врятли нужно менять Недочёты в Draw2, Mathem2 или самой программе, из за этого график и вылазиет за границы. Почти ко всем дествиям программы есть комментарии. Заранее благодарю!

  1. Помогите пожалуйста!!! уравнение: x-x в 3/3+x в 5/5+x/y+y Отрезок, содержащий корень и точное значение корня не известны

  1. проверьте пожалуйста. непойму в чем ошибка


Нашли ошибку?
Развитие проекта
Яндекс.Метрика