资源大小: 6.29MB
发布时间: 2009-12-24
文件格式: rar
下载次数: 1
分享到:

下载地址:

下载地址1
(本站为飞网专业下载站,域名:down.cfei.net)

资源简介:

void pdiv(p,m,q,n,s,k,r,l) int m,n,k,l; double p[],q[],s[],r[]; { int i,j,mm,ll; for (i=0; i<=k-1; i++) s[i]=0.0; if (q[n-1]+1.0==1.0) return; ll=m-1; for (i=k; i>=1; i--) { s[i-1]=p[ll]/q[n-1]; mm=ll; for (j=1; j<=n-1; j++) { p[mm-1]=p[mm-1]-s[i-1]*q[n-j-1]; mm=mm-1; } ll=ll-1; } for (i=0; i<=l-1; i++) r[i]=p[i]; return; }


飞网下载站,免费下载共享资料,内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。