Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Bronnikova
0 / 0 / 0
Регистрация: 06.04.2016
Сообщений: 5
1

Решение нелинейного уравнения методом хорд

23.03.2017, 16:43. Просмотров 863. Ответов 2
Метки нет (Все метки)

Помогите написать программу для решения нелинейного уравнения sqrt(x)-cos(0,387*x) по данной схеме.
Решение нелинейного уравнения методом хорд
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.03.2017, 16:43
Ответы с готовыми решениями:

Решение нелинейного уравнения методом Ньютона
Программа для решения нелинейного уравнения методом ньютона a*x+1 gx=b искал но не знаю...

Решение нелинейного уравнения методом простых итерации
Ребята, помогите решить лабораторную, пожалуйста. В программировании я полный "0". Вот текст...

Найти корень нелинейного уравнения F(x)=0 методом хорд. Крайние значения предела ([a,b]) содержащий корень и погрешность (\epsilon ) вводятся с клавиа
Найти корень нелинейного уравнения F(x)=0 методом хорд. Крайние значения предела () содержащий...

Метод хорд для решения нелинейного уравнения
Проблема вылазит при нажатии на кнопку вычислить в строке, где опичывается функция f (64-ая...

Найти корень нелинейного уравнения четыремя методами: половинного деления, касательных, хорд, итераций
Задание. Отделить корни уравнений F(x) = 0 и уточнить значения корней (или одного из них) с...

2
Cold
84 / 84 / 65
Регистрация: 22.05.2014
Сообщений: 478
23.03.2017, 16:48 2
Лучший ответ Сообщение было отмечено Bronnikova как решение

Решение

Метод хорд для решения нелинейного уравнения

Добавлено через 2 минуты
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
function f(x:Double):double;
begin
    result:=log10(x)-1/x*x;
end;
 
// a, b - пределы хорды, epsilon - необходимая погрешность
function findRoot(a,b,epsilon:double):double ;
begin
    while abs(b - a) > epsilon do begin
        a := b - (b - a) * f(b)/(f(b) - f(a));
        b := a - (a - b) * f(a)/(f(a) - f(b));
    end;
    result:=b;
end;
 
begin
 write(findroot(1,3,0.3):5:2);
 readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.
Добавлено через 1 минуту
Ваприантов МАССА, даже искать не пытаетесь...
Метод хорд
0
Bronnikova
0 / 0 / 0
Регистрация: 06.04.2016
Сообщений: 5
23.03.2017, 17:21  [ТС] 3
Спасибо! Варианты нашла, уже получилось
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.03.2017, 17:21

Решение нелинейного уравнения. Метод Ньютона
здравствуй, помогите пожалуйста найти ошибку в программе! необходимо найти корень уравнения методом...

Методом хорд вычислить с точностью E корень уравнения
Методом хорд вычислить с точностью E корень уравнения X^2-sin5x=0 Корень искать на интервале .

Решение уравнений методом хорд и касательных
Решить уравнение x^3-0,2x^2+1,5=0 E=0,001 в делфи комбинированным методом хорд и...


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

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

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