欢迎来到天天文库
浏览记录
ID:62554110
大小:72.37 KB
页数:4页
时间:2021-05-12
《选列主元高斯消去法.docx》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、精品文档//Gauss.cpp:Definestheentrypointfortheconsoleapplication.//#include"stdafx.h"#include"stdio.h"#include"math.h"intGauss(double*a,double*b,double*x,intn){//由于此处A矩阵传递的是一维数组//a[i,j]在程序中用a[i*n+j]表示,请注意区分inti,j,k,m;doublel;doubletemp;//消去过程for(k=0;k2、m*n+k])3、]-=l*a[k*n+j];3欢迎下载。精品文档b[i]-=l*b[k];//修改b[i]的值}}3欢迎下载。精品文档//回代过程for(i=n-1;i>=0;i--){x[i]=b[i];for(j=i+1;j4、68,0.1871},{1.1161,0.1254,0.1397,0.1490}};doubleb[4]={1.8471,1.7471,1.6471,1.5471};//bdoublex[4];//未知数xif(Gauss(*a,b,x,4)!=0){printf("增广矩阵A5、b最终形式为");for(i=0;i<=3;i++){for(j=0;j<=3;j++)printf("%et",a[i][j]);printf("%e",b[i]);}printf("计算结果为");for(i=0;i<=3;i++)printf("x(%d)=%e",i,x[6、i]);}}3欢迎下载。精品文档欢迎您的下载,资料仅供套考!致力为企业和个人提供合同协议,策划案计划书,学习资料等等打造全网一站式需求3欢迎下载
2、m*n+k])3、]-=l*a[k*n+j];3欢迎下载。精品文档b[i]-=l*b[k];//修改b[i]的值}}3欢迎下载。精品文档//回代过程for(i=n-1;i>=0;i--){x[i]=b[i];for(j=i+1;j4、68,0.1871},{1.1161,0.1254,0.1397,0.1490}};doubleb[4]={1.8471,1.7471,1.6471,1.5471};//bdoublex[4];//未知数xif(Gauss(*a,b,x,4)!=0){printf("增广矩阵A5、b最终形式为");for(i=0;i<=3;i++){for(j=0;j<=3;j++)printf("%et",a[i][j]);printf("%e",b[i]);}printf("计算结果为");for(i=0;i<=3;i++)printf("x(%d)=%e",i,x[6、i]);}}3欢迎下载。精品文档欢迎您的下载,资料仅供套考!致力为企业和个人提供合同协议,策划案计划书,学习资料等等打造全网一站式需求3欢迎下载
3、]-=l*a[k*n+j];3欢迎下载。精品文档b[i]-=l*b[k];//修改b[i]的值}}3欢迎下载。精品文档//回代过程for(i=n-1;i>=0;i--){x[i]=b[i];for(j=i+1;j4、68,0.1871},{1.1161,0.1254,0.1397,0.1490}};doubleb[4]={1.8471,1.7471,1.6471,1.5471};//bdoublex[4];//未知数xif(Gauss(*a,b,x,4)!=0){printf("增广矩阵A5、b最终形式为");for(i=0;i<=3;i++){for(j=0;j<=3;j++)printf("%et",a[i][j]);printf("%e",b[i]);}printf("计算结果为");for(i=0;i<=3;i++)printf("x(%d)=%e",i,x[6、i]);}}3欢迎下载。精品文档欢迎您的下载,资料仅供套考!致力为企业和个人提供合同协议,策划案计划书,学习资料等等打造全网一站式需求3欢迎下载
4、68,0.1871},{1.1161,0.1254,0.1397,0.1490}};doubleb[4]={1.8471,1.7471,1.6471,1.5471};//bdoublex[4];//未知数xif(Gauss(*a,b,x,4)!=0){printf("增广矩阵A
5、b最终形式为");for(i=0;i<=3;i++){for(j=0;j<=3;j++)printf("%et",a[i][j]);printf("%e",b[i]);}printf("计算结果为");for(i=0;i<=3;i++)printf("x(%d)=%e",i,x[
6、i]);}}3欢迎下载。精品文档欢迎您的下载,资料仅供套考!致力为企业和个人提供合同协议,策划案计划书,学习资料等等打造全网一站式需求3欢迎下载
此文档下载收益归作者所有