Нужно отыскать все корешки уравнения с точностью не ниже 10.Уравнение имеет
Нужно отыскать все корешки уравнения с точностью не ниже 10.
Уравнение имеет вид
Вот решение на 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-м снимке видно, что, потребовав точность , я получил ответ, отличающийся от ответа МАСТЕРА. Я так размышляю, что у меня не все переменные, требуемые для расчёта объявлены с двойной точностью. (Вначале таких там вообщем не было). Но 7 символов после запятой в ответе совпадают. :) А может это ограничение демоверсии QBASIC интерпретатора.
У меня когда-то была программка на QBASIC. (Первая личный компьютер сначала был без жёсткого диска. Под DOS грузили с дискеты. И там этот мелкий интерпретатор (ок 190 кБайт) был хорошим подспорьем.)
Программа сохранилась. Она вначале только график живописала. Потом я её дополнял. В том числе и решением уравнений вилкой. Было несколько версий Функцию я по-прыткому поменял на требуемую в задачке. Перелопачивать и выяснять на сто процентов состояние программки не стал.
За требуемую точность не поручусь. Но 4-6 символов после запятой выдам. Это был "Автоматический" вариант с прорисовкой графика. Красноватой линией прочерчивалась прямая y=0. График можно было перерисовывать, задавая новые пределы конфигурации переменной х. Смотря на график можно было найти исходные отрезки для пуска способа вилки.
На скринах, естественно, препядствия с кириллицей. (Ненастроенный DosBox) Но текст программы загнал в pdf. Там можно прочитать все надписи.
На 3-м снимке видно, что, потребовав точность , я получил ответ, отличающийся от ответа МАСТЕРА. Я так размышляю, что у меня не все переменные, требуемые для расчёта объявлены с двойной точностью. (Вначале таких там вообщем не было). Но 7 символов после запятой в ответе совпадают. :) А может это ограничение демоверсии QBASIC интерпретатора.
Есения
Это понятно. Хорошо, я хоть сейчас знаю заглавие метода. При необходимости можно поглядеть желая бы.
Алла Сельская
Управление поABC? Давайте
Гена Троничев
Пусть так. Саму реализацию способа вы желали предложить?
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов