欢迎来到天天文库
浏览记录
ID:53053083
大小:500.00 KB
页数:10页
时间:2020-03-31
《雅克比迭代法、高斯-赛德尔迭代法.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、昆明理工大学(计算机算法)实验报告实验名称:常用算法及数值计算实验时间:2009年6月3日专业:电信071姓名:李春华学号:200711102118成绩:一、实验目的1.通过实验进一步掌握高斯消去法的基本思想;2.通过上机实验进一步掌握高斯消去法的计算步骤,并能灵活运用;3.通过对高斯消去法的调试练习,进一步体会他的特点;4.通过上机调试运行,逐步培养解决实际问题的编程能力。二、实习要求1.熟悉TurboC的编译环境;2.实习前复习雅可比迭代法、高斯—塞得儿迭代法的计算步骤。三、实习设备1.硬件设备:单机或网络环境下的微型计算机一台;2.
2、软件设备:DOS3.3以上炒作系统,TurboC2.0编译器。四、实习内容雅可比迭代法与高斯—塞得儿迭代法用雅可比雅可比迭代法与高斯—塞得儿迭代法求解线性方程组Ax=b:要求:(1)写出程序的运行结果。(2)写出迭代次数。程序如下:1、雅可比迭代法#include#include#definen3#defineMAX_N100#defineeps1e-6intyacobi(floata[n][n],floatb[n],floatx[n]){floatd,s,max;floaty[n];inti,j,k,f
3、lag;k=0;for(i=0;i=MAX_N){flag=0;break;}for(i=0;i4、urn(flag);}voidzg_matric(floata[n][n],floatb[n]){inti,j;for(i=0;i5、);if(k==1)for(i=0;i#include#definen3#defineMAX_N100#defineeps1e-6intseidel(floata[n][n],floatb[n],floatx[n]){floatd,s,max,temp;inti,j,k,flag;k=0;for(6、i=0;i=MAX_N){flag=0;break;}}return(flag);}voidzg_matric(floata[7、n][n],floatb[n]){inti,j;for(i=0;i8、rintf("x%d=%11.7f",i+1,x[i]);elseprintf("TheMethodisdisconvergent!");}结果如下:五、思考题:(1)雅可比迭代法与高
4、urn(flag);}voidzg_matric(floata[n][n],floatb[n]){inti,j;for(i=0;i5、);if(k==1)for(i=0;i#include#definen3#defineMAX_N100#defineeps1e-6intseidel(floata[n][n],floatb[n],floatx[n]){floatd,s,max,temp;inti,j,k,flag;k=0;for(6、i=0;i=MAX_N){flag=0;break;}}return(flag);}voidzg_matric(floata[7、n][n],floatb[n]){inti,j;for(i=0;i8、rintf("x%d=%11.7f",i+1,x[i]);elseprintf("TheMethodisdisconvergent!");}结果如下:五、思考题:(1)雅可比迭代法与高
5、);if(k==1)for(i=0;i#include#definen3#defineMAX_N100#defineeps1e-6intseidel(floata[n][n],floatb[n],floatx[n]){floatd,s,max,temp;inti,j,k,flag;k=0;for(
6、i=0;i=MAX_N){flag=0;break;}}return(flag);}voidzg_matric(floata[
7、n][n],floatb[n]){inti,j;for(i=0;i8、rintf("x%d=%11.7f",i+1,x[i]);elseprintf("TheMethodisdisconvergent!");}结果如下:五、思考题:(1)雅可比迭代法与高
8、rintf("x%d=%11.7f",i+1,x[i]);elseprintf("TheMethodisdisconvergent!");}结果如下:五、思考题:(1)雅可比迭代法与高
此文档下载收益归作者所有