Всем привет) Задали домашку по проге:Модифицированным методом Ньютона решить функцию a0+a1*x+a2*x*x+a3*log(1/x)
Написал код,но с производной что-то не так
#include
#include
#include
float f(float a0, float a1, float a2, float a3, float x)
{
return a0+a1*x+a2*x*x+a3*log(1/x);
}
int main ()
{
int n;
float a0, a1, a2, a3, E, A, B, x0, x1, proisv;
FILE *myfile;
myfile = fopen ("Vivod.txt", "w");
printf ("Для решения уравнения a0+a1*x+a2*x*x+a3*ln(1/x) введите значения следующих коэффицентов: \n");
printf ("a0=");
scanf ("%f", &a0);
printf ("a1=");
scanf ("%f", &a1);
printf ("a2=");
scanf ("%f", &a2);
printf ("a3=");
scanf ("%f", &a3);
printf ("Введите желаемую точность решения: ");
scanf ("%f", &E);
printf ("Введите начальную границу интервала: ");
scanf ("%f", &A);
printf ("Введите конечную границу интервала: ");
scanf ("%f", &B);
printf ("Введите примерное значение решения уравнения(приближение): ");
scanf ("%f", &x0);
while ((x0 B))
{
printf ("Заданное приближение не принадлежит заданному интервалу.Введите корректное значение приближения: ");
scanf ("%f", &x0);
}
proisv=a1+(2*a2*x0)-(a3/x0);
do
{
x1=x0-(f(a0, a1, a2, a3, x0)/proisv);
x0=x1;
}while(fabs(x0-x1)>E);
if ((x1 B))
{
printf ("В заданном интервале нет решений данного уравнения. \n");
fprintf (myfile, "There are no solutions to this equation in this interval. \n");
}
else
{
printf ("%f \n", x1);
fprintf (myfile, "%f \n", x1);
}
}
133
403
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(100,-50,50); a.println; var d: =new dictionary< integer,integer> ; foreach var x in a do if d.containskey(x) then d[x]: =d[x]+1 else d[x]: =1; writeln('встречаются более одного раза'); d.where(kv-> kv.value> 1).select(kv-> kv.key).orderby(x-> x).println; writeln('встречаются ровно один раз'); d.where(kv-> kv.value=1).select(kv-> kv.key).orderby(x-> x).println; end. пример -35 40 7 -22 -4 -24 10 -46 4 23 -4 13 -44 7 -34 -13 -8 -18 -35 14 49 -36 3 -31 42 -47 -24 -34 -22 -25 36 24 39 43 -31 -26 23 -4 -41 2 -11 27 -14 -2 -47 42 -16 -38 -23 2 -27 44 -13 -36 15 -50 -14 -12 -14 -7 -50 -7 26 -22 37 22 25 -37 -13 43 15 46 -28 13 -26 -29 29 -46 -35 50 20 -36 39 26 -48 43 -14 24 -23 -31 38 -15 -41 17 2 47 -49 -43 12 -19 встречаются более одного раза -50 -47 -46 -41 -36 -35 -34 -31 -26 -24 -23 -22 -14 -13 -7 -4 2 7 13 15 23 24 26 39 42 43 встречаются ровно один раз -49 -48 -44 -43 -38 -37 -29 -28 -27 -25 -19 -18 -16 -15 -12 -11 -8 -2 3 4 10 12 14 17 20 22 25 27 29 36 37 38 40 44 46 47 49 50
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kristina16022511.03.2022 20:58
-
qmess1024.03.2022 23:42
-
egorkrutou9805.01.2020 12:01
-
koookBook07.11.2021 20:06
-
Aina200627.10.2022 02:08
-
dianaevdokimova7717.10.2022 07:57
-
3ТОН15.12.2020 13:00
-
iphoneXY31.08.2021 12:51
-
динозаврррррр05.12.2020 18:34
-
dkrechetov8504.12.2020 07:20
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.