Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
3 / 5 / 0
Регистрация: 09.12.2012
Сообщений: 104

Ошибка в функции нахождения корня уравнения

21.01.2015, 17:44. Показов 652. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Есть код, который определяет корень функции ... или как там это называется: F(x)=0 ... нужен х. Вот код:
C++
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
29
30
31
32
33
34
35
36
37
Memo12->Clear();
buff1=StrToFloat(Edit171->Text);
bufi1=StrToFloat(Edit172->Text);
buff2=StrToFloat(Edit173->Text);
buff3=StrToFloat(Edit177->Text);
buff4=0;
buff6=pow(buff4,bufi1)*buff2-buff4*buff1+buff1-buff2;
Memo12->Lines->Add("Øàã 0: "+FloatToStr(buff6));
if (abs(buff6)>buff3)
{
    Memo12->Lines->Add("    "+FloatToStr(buff6)+" > "+FloatToStr(buff3));
}
else
{
    Memo12->Lines->Add("    "+FloatToStr(buff3)+" > "+FloatToStr(buff6));
}
bufi2=0;
buff9=0.000001;
while (abs(buff6)>buff3)
{
    buff7=pow(buff4+buff9,bufi1)*buff2-(buff4+buff9)*buff1+buff1-buff2;
    buff8=(buff7-buff6)/buff9;
    buff4=(buff8*buff4-buff6)/buff8;
    buff6=pow(buff4,bufi1)*buff2-buff4*buff1+buff1-buff2;
    bufi2++;
    Memo12->Lines->Add("Øàã "+IntToStr(bufi2)+": "+FloatToStr(buff6));
    if (abs(buff6)>buff3)
    {
        Memo12->Lines->Add("    "+FloatToStr(buff6)+" > "+FloatToStr(buff3));
    }
    else
    {
        Memo12->Lines->Add("    "+FloatToStr(buff3)+" > "+FloatToStr(buff6));
    }
}
Edit174->Text=FloatToStr(buff4);
Edit186->Text=IntToStr(bufi2);
В логах вижу это:

Шаг 0: 4.2
4.2 > 0.001
Шаг 1: 0.139920982906753
0.001 > 0.139920982906753

Стрелять колотить ... это выносит мозг.

Добавлено через 20 часов 34 минуты
В чем проблема может быть тут?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.01.2015, 17:44
Ответы с готовыми решениями:

Проверить программу нахождения корня уравнения
Народ нужна проверка по И-циклам. Буду очень признателен const a=0; b=0.8; // начало и конец промежутка var e, x2, x1, c...

Комбинированный метод нахождения корня уравнения
Всем здравствуйте, у меня такая проблема: при выводе результата на экран, в зависимости от вводимых значений, происходит...

Составить программу для нахождения корня уравнения
Ребята помогите пожалуйста,очень нужно,прям капец как нужно.Заранее огромное спасибо Составьте программу для нахождения корня...

2
Почетный модератор
Эксперт С++
 Аватар для SatanaXIII
5851 / 2862 / 392
Регистрация: 01.11.2011
Сообщений: 6,906
22.01.2015, 09:29
Цитата Сообщение от Gendalf147 Посмотреть сообщение
В чем проблема может быть тут?
В двух вещах:
1) Жутком фарше из переменных.
2) В отсутствии описания что вообще происходит.

Что это за хрень? Куча одинаковых buf-buf. Все складывается, умножается, вычитается, складывается, выводится в мемо... Что? Что это? Что происходит? Лопни мои глаза, я хочу закрыть эту вкладку и больше не видеть ее никогда.
Вот приблизительно такие мысли приходят на ум, когда видишь такую тему. Это я к тому, что неплохо было бы добавить небольшое описание; пояснение к алгоритму, и к коду.
0
 Аватар для BRcr
4043 / 2333 / 292
Регистрация: 03.02.2011
Сообщений: 5,066
Записей в блоге: 10
22.01.2015, 14:26

Не по теме:

SatanaXIII, я так сильно подозреваю, у ТС такие же феерические ощущения, тк код чужой, а он в нем разбирается.:jokingly:


Gendalf147, если я прав, лучше выложи задачу вместо этого бесноватого кода. Проще переписать.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
22.01.2015, 14:26
Помогаю со студенческими работами здесь

Найти ошибки в программе для нахождения корня уравнения
Помогите пожалуйста, не пойму в чём ошибки: 2)Составить программу для нахождения корня уравнения методом итерации с точностью...

Написать программы для нахождения корня уравнения методом Ньютона
Здравствуйте помогите пожалуйста Составить алгоритмы и написать программы для нахождения корня уравнения методом Ньютона и...

Составить программу для нахождения корня уравнения методом итерации
Составить программу для нахождения корня уравнения методом итерации с точностью ε=0,001. {x}^{4}-4.1{x}^{3}+{x}^{2}-5.1x+4.1=0

Написать рекурсивную функцию нахождения корня уравнения методом хорд
помогите,пожалуйста,написать рекурсивную функцию нахождения корня уравнения методом хорд)

Проверить условия совпадения и записать расчетные формулы для нахождения корня уравнения с заданной точностью
1) Проверить условия совпадения и записать расчетные формулы для нахождения корня уравнения с точностью ε = 10 -4. 2) Составить...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек SDL3 и Box2D из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия SDL 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual. . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru