?? 7.2 求解非線性方程一個實根的牛頓法 newt.c
字號:
#include "stdio.h"
#include "math.h"
int newt(x,eps,js,f)
int js;
double *x,eps;
void (*f)();
{
int k,l;
double y[2],d,p,x0,x1;
l=js; k=1; x0=*x;
(*f)(x0,y);
d=eps+1.0;
while ((d>=eps)&&(l!=0))
{
if (fabs(y[1])+1.0==1.0)
{
printf("err\n");
return(-1);
}
x1=x0-y[0]/y[1];
(*f)(x1,y);
d=fabs(x1-x0); p=fabs(y[0]);
if (p>d) d=p;
x0=x1; l=l-1;
}
*x=x1;
k=js-l;
return(k);
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -