Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/22: Рейтинг темы: голосов - 22, средняя оценка - 4.91
0 / 0 / 0
Регистрация: 24.05.2013
Сообщений: 13
1

Методом половинного деления найти корень уравнения

24.05.2013, 21:45. Показов 4233. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
методом половинного деления найти корень уравнения y=sin(lnx)-cos(lnx)+2*lnx, заключенного на промежутке [1;3] с точностью ε=10-5. определить число итераций, необходимых для нахождения корня, произвести проверку корня. выводить с помощью оператора вывода в стандартном формате.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2013, 21:45
Ответы с готовыми решениями:

Корень уравнения методом половинного деления
Нужно составить программу, которая решает уравнение 5*x^2 - 6*x - 3 (F(x)=0) методом половинного...

Уточнить корень уравнения методом половинного деления
Отделить корни уравнения графически, а потом на Паскале уточнить один из них методом половинного...

Определить какой-либо корень уравнения f(x) = 0 с точностью до ε методом половинного деления
Определить какой-либо корень уравнения f(x) = 0 с точностью до ε методом половинного деления...

Найти корень методом половинного деления
k=tg(3.4*z*z*z)+cos(z+1.2) найти корень методом половинного деления плиз

1
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
25.05.2013, 11:12 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
uses crt;
function F(x:real):real;
begin
F:=sin(ln(x))-cos(ln(x))+2*ln(x);
end;
var a,b,c,x,e:real;
    k:integer;
begin
clrscr;
a:=1;
b:=3;
e:=0.00001;
writeln('Решение уравнения sin(ln(x)-cos(ln(x)+2*ln(x)=0');
writeln('на интервале [1;3] с погрешностью e=10^-5');
k:=0;
repeat
   c:=(a+b)/2;
   if F(a)*F(c)<=0 then b:=c
   else a:=c;
   k:=k+1
until abs(b-a)<e;
x:=(a+b)/2;
writeln('x=',x:0:5);
writeln('Значение функции=',F(x):0:5);
readln
end.
1
25.05.2013, 11:12
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.05.2013, 11:12
Помогаю со студенческими работами здесь

Методом деления отрезка пополам найти корень уравнения 2^x+5x-3=0 на отрезке [0;10]
Методом деления отрезка пополам найти корень уравнения 2^x+5x-3=0 на отрезке .

Вычислить корень с заданной точностью 0.01 методом половинного деления
Всех с праздником! Очень нужна помощь! Вычислить корень с заданной точностью 0.01 методом...

Методом деления отрезка пополам с абсолютной погрешностью E найти корень уравнения x^4+2x^3-x-1 =0 на отрезке [0,1].
Методом деления отрезка пополам с абсолютной погрешностью E найти корень уравнения x^4+2x^3-x-1 =0...

Процедура нахождения корня уравнения методом половинного деления и методом Ньютона
написать программу процедуру для нахождения корня каждого уравнения методом половинного деления и...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru