- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
高斯列主元素消去法算法C
#includeiostream
#includefstream
#includestdlib.h
#includemath.h
#define eps 0.0000000005
using namespace std;
void exchange(double A[3][3],double b[],int p,int q);
void xiaoyuan(double A[3][3],double b[],int p,int n);
void gauss(double A[3][3],double b[],int n);
int main(int argv,char argc[])
{
double A[3][3];
A[0][0]=0
A[0][1]=2;
A[0][2]=3;
A[1][0]=-1;
A[1][1]=3.712;
A[1][2]=4.623;
A[2][0]=-2;
A[2][1]=1.072;
A[2][2]=5.643;
double b[3]={1,2,3};
gauss(A,b,3);
return 0;
}
void exchange(double A[3][3],double b[],int p,int q,int n)
{
for(int i=0;i!=n;i++)
{
double temp=0;
temp=A[p][i];
A[p][i]=A[q][i];
A[q][i]=temp;
}
double temp=0;
temp=b[p];
b[p]=b[q];
b[q]=temp;
//coutb[]b[p] b[q]endl;
}
void xiaoyuan(double A[3][3],double b[],int p,int n)
{
cout消元endl;
for(int i=p;i!=n-1;i++)
{
couti=iendl;
double temp=(0-A[i+1][p])/A[p][p];
for(int j=p;j!=n;j++)
{
A[i+1][j]=A[i+1][j]+A[p][j]*temp;
coutA[i+1][j] ;
}
b[i+1]=b[i+1]+b[i]*temp;
coutb[i+1];
}
}
void gauss(double A[3][3],double b[],int n)
{
for(int k=0;k!=n-1;k++)
{
double max=0;
int index=k;
coutA[k][k];
max=A[k][k];
for(int i=k+1;i!=n;i++)
{
if(fabs(A[i][k])-fabs(max)0)
{
max=A[i][k];
index=i;
}
}
coutendlmaxendl;
if(fabs(max)eps)
{
cout无解endl;
exit(1);
}
if(k!=index)
{
exchange(A,b,k,index,n);
}
xiaoyuan(A,b,k,n);
system(PAUSE);
}
if(fabs(A[n-1][n-1])eps)
{
cout无解endl;
exit(1);
}
//
coutb=endl;
for(k=n-1;k!=-1;k--)
{
coutb[k] ;
}
coutendl;
for(int i=n-1;i!=-1;i--)
{
double sum=0;
for(int j=i;j!=n-1;j++)
{
double temp=0;
temp=A[i][j+1]*b[j+1];
sum=sum+temp;
}
b[i]=(b[i]-sum)/A[i][i];
coutb[i]endl;
}
}
您可能关注的文档
最近下载
- 羊水栓塞护理措施.pptx VIP
- 星球版八年级上册地理第四章《第一节 因地制宜发展农业》教案.docx VIP
- 2025年粤东西北教师全员轮训心得体会2篇.doc VIP
- TCRHA-成人床旁心电监测护理规程.pdf VIP
- 中联W6015-8A塔吊说明书操作手册.pdf VIP
- 过滤材料和部件市场前景预测与技术创新策略研究报告.pdf
- 新生儿甲状腺功能降低.pptx
- 8.27-安徽A10联盟2025届高三8月底开学摸底考试题及答案1号卷·A10联盟2025届高三上学期8月底开学摸底考物理答案.pdf VIP
- 华为HCIE-CloudServiceSolutionsArchitect云服务练习试题.doc
- 8.27-安徽A10联盟2025届高三8月底开学摸底考试题及答案A10联盟2025届高三上学期8月底开学摸底考英语答案 1.docx VIP
文档评论(0)