Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 05.11.2013
Сообщений: 2
1

Решить уравнение методом Ньютона (касательных)

05.11.2013, 15:46. Просмотров 538. Ответов 1
Метки нет (Все метки)

ребят, где я ошибся? задача была уравнение √x+x2-3 решить методом ньютона(касательных)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses crt;
var x,a,k,b,e:real;
function F1(z:real):real;
begin
F1:=sqrt(x)+sqr(x)-3;
end;
function F2(z:real):real;
begin
F2:=1/(2*(sqrt(x)))+(2*x);
end;
begin
k:=0;
read(a,b);
write('e= ');
readln(e);
if F1(a)*F2(a)>0 then x:=a
else
x:=b;
while abs(F1(x))>e do
begin
k:=k+1;
x:= x-F1(x)/F2(x);
end;
writeln('f(x)= ', F1(x):0:5);
writeln('x= ',x:0:5);
writeln('k= ',k:0:0);
readln;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.11.2013, 15:46
Ответы с готовыми решениями:

Решить уравнение методом Ньютона (касательных)
X^3-2x-13 методом Ньютона (касательных). Помогите пожалуйста..

Решить уравнение методом касательных
Надо решить уравнение f(x)=e^{x}-x^{3}+3x^{2}-2x-3 методом касательных. оно имеет 2...

Решить задачу модифицированным методом Ньютона
решить задачу модифицированным методом Ньютона, сам пробовал, но не получилось..

Решить уравнение графическим методом
Помогите нужно решить уравнение графическим методом x^3+x^2-3=0

1
32 / 37 / 47
Регистрация: 14.10.2013
Сообщений: 108
06.11.2013, 02:01 2
Цитата Сообщение от paran0ik Посмотреть сообщение
x:= x-F1(x)/F2(x);
вот здесь...
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.11.2013, 02:01

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Решить уравнение методом хорда
Помогите решить уравнение методом хорда : X^3 + 4X^2 - 6 = 0 .

Методом деления отрезка пополам решить уравнение
Задание на курсовую работу по информатике Вариант 8 Задание: Методом деления отрезка пополам...

Решить уравнение методом деления отрезка пополам
Решить уравнение методом деления отрезка пополам. Каждый этап решения выводить в файл: sin(1-x)=x...

Решить уравнение методом деления отрезка пополам
уравнение arcsin(x)+x-1=0, с погрешностью Е=10^(-6) по математической части знаю, графическим...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.