Нужно отыскать все корешки уравнения с точностью не ниже 10.Уравнение имеет

Нужно отыскать все корешки уравнения с точностью не ниже 10.
Уравнение имеет вид
\displaystyle \sqrtx+3-\cos(0.387x)=0

Вот решение на PascalABCNET 3.3, сборка 1627 от 27.01.2018:

uses NumLibABC;

begin
var f:real-gt;real:=x-gt;Sqrt(Абс(x+3))-Cos(0.387*x);
var oL:=new RootsIsolation(f,-10,10,0.1);
var oZ:=new Zeroin(f,1e-12);
foreach var r in oL.Value do
oZ.Value(r[0],r[1]).Println
end.

Найдены корешки
-3.1250285461067
-2.77171087522778

Интересует решение иным путем (назовем его "школьным" либо "студенческим") на любом из языков Pascal, C/C++/C, Basic.

Задать свой вопрос
Геннадий Акжиштов
Студентом бы я мог использовать способ "вилки" довольно прост для реализации (когда-то и делал). Правда сначала нужно "изолировать" все корешки. Для хоть какого уравнения автоматический гарантированный поиск всех корней не представляю. Н вот непосредственно это. Достаточно рассмотреть только отрезок, являющийся решением неравенства x+3<=1.
Тимур Басалкинд
Приветствую тебя, уважаемый. С большой неохотой принуждён признать своё бессилие в решении этой задачи. За два денька я не сумел побороть её. Моих познаний, действительно хватает только для нахождения суммы цифр числа (((
1 ответ
Ну раз никто не осмелился, а может не возжелал копаться, покажу я вам динозавра!
У меня когда-то была программка на QBASIC. (Первая личный компьютер сначала был без жёсткого диска. Под DOS грузили с дискеты. И там этот мелкий интерпретатор (ок 190 кБайт) был хорошим подспорьем.)
 Программа сохранилась. Она вначале только график живописала. Потом я её дополнял. В том числе и решением уравнений вилкой. Было несколько версий Функцию я по-прыткому поменял на  требуемую в задачке. Перелопачивать и выяснять на сто процентов состояние программки не стал.
  За требуемую точность не поручусь. Но 4-6 символов после запятой выдам. Это был "Автоматический" вариант с прорисовкой графика. Красноватой линией прочерчивалась прямая y=0. График можно было перерисовывать, задавая новые пределы конфигурации переменной х. Смотря на график можно было найти исходные отрезки для пуска способа вилки.
На скринах, естественно, препядствия с кириллицей. (Ненастроенный DosBox) Но текст программы загнал в pdf. Там можно прочитать все надписи.

На 3-м снимке видно, что, потребовав точность 10^-12, я получил ответ, отличающийся от ответа МАСТЕРА. Я так размышляю, что у меня не все переменные, требуемые для расчёта объявлены с двойной точностью. (Вначале таких там вообщем не было). Но 7 символов после запятой в ответе совпадают. :) А может это ограничение демоверсии QBASIC интерпретатора.

x_1 \approx -3,1203 \\  \\ x_2 \approx -2,77171


Есения
Это понятно. Хорошо, я хоть сейчас знаю заглавие метода. При необходимости можно поглядеть желая бы.
Алла Сельская
Управление поABC? Давайте
Гена Троничев
Пусть так. Саму реализацию способа вы желали предложить?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт