2015计算方法课程设计报告1.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2015计算方法课程设计报告1

计算方法课程设计报告 指导教师:何丽丽 学生姓名:李仔麒 学生学号 综合实验一 实验名称 龙贝格外推法 实验目的及要求 求抛物线y=x2与x=y2围成的图形面积,精确到10-4。 算法描述 程序设计源代码 #includestdio.h #includemath.h #define e 1e-6 double fa(double x) {return x*x; } double fb(double z) {return sqrt(z); } int main() {double t[100][100],a,b,s; int i,j,n; while(scanf(%lf%lf,a,b)!=EOF) {t[0][0]=(fa(a)+fb(b))*(b-a)/2; i=1; do {s=0; for(n=1;n=pow(2,i-1);n++) {s+=fa(a+(2*n-1)*(b-a)/pow(2,i)); } t[i][0]=t[i-1][0]+(b-a)*s/pow(2,i); for(j=1;j=i;j++) t[i][j]=((pow(4,j)*t[i][j-1])-t[i-1][i-1])/(pow(4,i)-1); }while(fabs(t[i][i]-t[i-1][i-1])e); printf(%.4lf\n,t[i][i]); } } 结果与分析 综合实验二 实验名称 曲线拟合最小二乘法 实验目的及要求 中国人口拟合问题。据统计,近十年中国人口数据如下(单位:亿) 年 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 人口 12.9988 13.0756 13.1448 13.2129 13.2802 13.3474 13.4100 13.4735 13.5404 13.6072 根据表中数据,预测2013年末中国人口数。 设人口总数为,根据人口理论的马尔萨斯模型,采用指数函数 对数据进行拟合,其中t是年份。 为了计算方便,将上式两边同取对数,得 , 令或,变换后的拟合函数为 , 对人口数据取对数计算,得下表 t 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 y ln12.9988 ln13.0756 ln13.1448 ln13.2129 ln13.2802 ln13.3474 ln13.4100 ln13.4735 ln13.5404 ln13.6072 由这些数据可确定a,b的值,从而估计的值。 算法描述 程序设计源代码 #includestdio.h #includemath.h #includestdlib.h #define e 2.71828 int main() {int i,j,k,m,n,L; double b[100][100],d[100],x[100],y[100],g[100],c[100][100],q,D,t,sum1,sum,sum2,z; while(scanf(%d%d,m,n)!=EOF) {sum1=sum=sum2=0.0; for(i=0;i=n;i++) scanf(%lf,x[i]); for(j=0;j=n;j++) scanf(%lf,y[j]); for(j=0;j=n;j++) y[j]=log(y[j]); for(i=0;i=m;i++) {for(j=0;j=m;j++) {sum=0; for(k=0;k=n;k++) sum+=pow(x[k],j+i); b[i][j]=sum; } sum1=0; for(k=0;k=n;k++) sum1+=y[k]*pow(x[k],i); d[i]=sum1; } for(i=0;i=m;i++) b[i][m+1]=d[i]; for(k=0;k=m-1;k++) {D=b[k][k]; L=k; for(i=k+1;i=m;i++) {if(fabs(D)fabs(b[i][k])) {D=b[i][k]; L=i; } } if(fabs(D)1e-6) break; else {if(k!=L) {for(j=k;j=m+1;j++)

文档评论(0)

cgtk187 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档