- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验1拉格日插值与牛顿插值
西华数学与计算机学院上机实践报告
课程:级::名称: 上机实践日期: 上机实践编号:
一、目的
二、内容与y=f(x)的数据表如下,求t=0.63处的函数值z=f(t) 。
i xi yi i xi yi 1 0.10 0.904837 6 0.57 0.565525 2 0.15 0.860708 7 0.70 0.496585 3 0.25 0.778801 8 0.85 0.427415 4 0.40 0.670320 9 0.93 0.394554 5 0.50 0.606531 10 1.00 0.367879
三、用环境
四#includestdio.h
main()
{
float x[8],y[8];
float t,z=0.0,s;
int n=0,i=0,tp=0,start,end,j;
printf(请输入节点控制数n);
printf(\n);
scanf(%d,n);
printf(请输入节点t的值);
printf(\n);
scanf(%f,t);
//节点赋值
for(i=0;in;i++)
{ printf(请输入插点序列x%d与y%d的值\n,i,i);
scanf(%f %f,x[i],y[i]);
}
//记录t节点的位置
while(x[tp]t tpn)
{
tp++;
}
//确定起点下标和终点下标位置//用8个节点就选取值离t最近的8个节点
start=tp-4;
end=tp+3;
if(start0)
{
start=0;
end=start+7;
}
if(endn-1)
{
end=n-1;
start=end-7;
}
//用所选插值点做拉格朗日插值多项式运算
for(i=start;iend;i++)
{ s=1.0;//插值基函数初值为1
for(j=start;jend;j++)
{
if(j!=i)
{
s=s*(t-x[j])/(x[i]-x[j]);
}
}
z=z+s*y[i];
}
printf(拉格朗日插值结果为%f,z);
printf(\n);
}
2.牛顿插值
#includestdio.h
#define max 20
main()
{
double x[max],y[max];//插值点xi以及对应函数yi的函数值
double t,fw;//t为待求的参数点fw为对应要求的值
double ft[max][max];//表示各阶差商第二维为阶数
int n=0,i=0,j=0;
double b[max];
/*printf(请输入节点控制数n);
printf(\n);
scanf(%d,n);
printf(请输入节点t的值);
printf(\n);
scanf(%f,t);
//节点赋值
for(i=0;in;i++)
{ printf(请输入插点序列x%d与y%d的值,i,i);
printf(\n);
scanf(%f%f,x[i],y[i]);
}
printf(\n);*/
n=10;
t=0.63;
x[0]=0.10;y[0]=0.904837;
x[1]=0.15;y[1]=0.860708;
x[2]=0.25;y[2]=0.778801;
x[3]=0.40;y[3]=0.670320;
x[4]=0.50;y[4]=0.606531;
x[5]=0.57;y[5]=0.565525;
x[6]=0.70;y[6]=0.496585;
x[7]=0.85;y[7]=0.427415;
x[8]=0.93;y[8]=0.394554;
x[9]=1.00;y[9]=0.367879;
for(i=0;in;i++)
{
printf(%f\t%f\n,x[i],y[i]);
}
//计算差商
for(i=0;in;i++)
{
ft[i][0]=y[i];//计算0阶差商
}
for(i=1;in;i++)
{
for(j=1;j=i;j++)
{
ft[i][j]=(ft[i][j-1]-ft[i-1][j-1])/(x[i]-x[i-j]);
}
}
//累加计算牛顿多项式
b[n-1]=ft[n-1][n-1];
for(i=n-1;i=1;i--)
{
b[i-1]=ft[i-1][i-1]+b[i]*(t-x[i-1]);
}
fw=b[0];
printf(牛顿插值的结果为%f\n,fw);
}
五、总结
西华大学计算机系学生上机报告
5 页 共 5 页
第 1 页 共
您可能关注的文档
最近下载
- 肉牛生产性能测定技术规范-编制说明.pdf VIP
- 中医药治疗乙型肝炎的优势及存在的问题.docx VIP
- 高危新生儿眼病筛查分类管理专家共识(2024).pptx VIP
- 24J306国家建筑标准设计图集.docx
- 汽车轮毂结构优化与轻量化设计研究.docx VIP
- 生物质呋喃基新材料呋喃二甲酸(FDCA)项目可行性研究报告写作模板-申批备案.doc
- 2025年搬运机器人行业研究报告及未来五至十年行业预测分析报告.docx
- FDCA行业动态报告:FDCA发展潜力巨大,下游制成PEF替代空间广阔.docx
- 学前儿童美术教育与活动指导第4版全套教学课件.pptx
- 预算编制服务投标方案(技术标).pdf
文档评论(0)