Нужно отыскать все корешки уравнения с точностью не ниже 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-м снимке видно, что, потребовав точность
Есения
Это понятно. Хорошо, я хоть сейчас знаю заглавие метода. При необходимости можно поглядеть желая бы.
Алла Сельская
Управление поABC? Давайте
Гена Троничев
Пусть так. Саму реализацию способа вы желали предложить?
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Вычислите силу с которой при давлении 100 КПа атмосфера давит на
Физика.
Синтаксический разбор и схема Но мы сказали, что нам ничего не
Русский язык.
Массовая доля целлюлозы в древесине составляет 50%. Какая масса спирта может
Химия.
помоги мне пожалуста прш
869*(61124-488*125)-50974
Математика.
по шкале высот определить ,в каком направлении происходит понижение релефа уральских гор
География.
Помогите пожалуйста написать Сочинение Овчинникова "победитель'
Литература.
Здравствуйте. Нужен цитатный план испытания лётчика в лесу главы2-13 по повести
Разные вопросы.
Облако тегов