Метод касательных - ПРИМЕРЫ ПРОГРАММ - ПРОГРАММИРОВАНИЕ - БИБЛИОТЕКА УЧЕБНЫХ МАТЕРИАЛОВ

PRIMAT.ORG
© 2008-2012

ПРИКЛАДНАЯ
МАТЕМАТИКА

Сайт для студентов, школьников, преподавателей, программистов и математиков. Здесь можно online решить задачу, пройти тесты, найти решение или программу, получить помощь. Можно добавить задачу, программу, статью.


	Вход

НОВОЕ В БИБЛИОТЕКЕ

● Дифференциальные уравнен...
● Дифференциальные уравнен...
● Дифференциальные уравнен...
● Составление дифференциал...
● Составление дифференциал...
● Производные высших поряд...
● Производные высших поряд...
● Дифференцирование тригон...
● Дифференцирование алгебр...
● Дифференцирование алгебр...

НОВЫЕ ФАЙЛЫ

● Sm графики функций (beta...
● Graf_builder
● Учимся считать
● Мобильный справочник по ...
● Уникальный калькулятор
● Программа для построения...
● «Новости ПриМата» для An...
● Schedule Builder Light 2...
● График
● Sm Калькулятор

    ЛУЧШИЕ ПУБЛИКАЦИИ

● Бухаете? Тогда я иду к в...
● Считаем сумму ряда
● Новый вирус - три десятк...
● Получить кнопку ТИЦ и Pa...
● Программирование под And...
● Матричный калькулятор (3...
● Пара интересных задач
● Небольшая забава для про...
● Немного юмора для матема...
● Продержись восемнадцать ...

    ЛУЧШИЕ МАТЕРИАЛЫ

● Высшая математика. Лекци...
● Высшая математика. Лекци...
● Умножение матриц (Паскал...
● Высшая Математика. Лекци...
● Высшая математика. Лекци...
● Высшая Математика. Лекци...
● Темы курсовых работ (укр...
● Пример использования мно...
● Теория графов плюс бонус...
● Сортировка Хоара (быстра...

    10 ЛУЧШИХ ФАЙЛОВ

● Эконометрика
● Таблица производных
● Шпаргалка по высшей мате...
● Математические формулы
● Гмурман. Теория вероятно...
● Таблица интегралов
● Таблицы неопределенных и...
● Программирование на язык...
● Программирование на Си (...
● Программирование на язык...

Конструктор информеров


	Карта тегов сайта Навигатор-карта сайта Информация о сайте Статистика сайта FAQ (вопрос/ответ)


	На сайте всего: 1 Посетителей: 1 Пользователей: 0


	БИБЛИОТЕКА УЧЕБНЫХ МАТЕРИАЛОВ

ГЛАВНАЯ » БИБЛИОТЕКА » ПРОГРАММИРОВАНИЕ » ПРИМЕРЫ ПРОГРАММ

[ ДОБАВИТЬ ]

Метод касательных

Решение уравнения f(x) = 0 методом касательных. Численный метод для получения корня уравнения. Язык Паскаль.

program metod_Newton;
uses crt;
const
 delta = 0.001;epsilon=0.00001;
var a, b, x1, x0: real;

function f(x:real):real;
{Oписание функции}
begin
 f:=x*x*x*x-2*x-4
 {Тестовый пример}
 {f:=sin(x)}
end;

function df(x:real):real;
{Приближенное вычисление производной}
begin
 df:=(f(x+delta)-f(x))/delta;
end;

{Описание метода касательных}
function Newton (x1:real):real;
 var n:integer; x0:real;
begin
 n:=0;
 repeat
 x0:=x1;
 x1:=x0-f(x0)/df(x0);
 writeln('x', n, ' = ',x1:8:5,' f(x', n, ')=', f(x1):8:5);
 n:=n+1;
 until abs(x0-x1)<=epsilon;
 writeln('Число итераций =',n);
 Newton:= x1
end;

Begin
 TextBackGround(Blue); TextColor(Yellow); ClrScr;
 write('Введите приближение x1 = ');readln(x1);
 x0:=Newton(x1);
 writeln('Значение корня с точностью ', epsilon:7:5);
 writeln('x =', x0:8:6);
 readln
End.

Просмотров [ 1007 ] ● 18.08.10 ● Рейтинг [ 100% ]

Комментариев: [ 1 ]

nicni ● 17.04.11

помогите пожалуйста со следующим примером:

найти корень урав-я (уточнив при необхо-ти диапазон [A-B]). 10.31*ln(x+10.42)+40.01=0 на отрезке от A=-9.35943 до B=-10.42000 методом касательных. точность решения EPS:0.000097.


	Украинская Баннерная Сеть

Ваше Имя