- 1、本文档共5页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
C语言解线性方程组
实验一、用C语言解线性方程组
一、实验名称:用C语言解线性方程组。
二、实验原理:用初等行变化的方法将线性方程组的增广矩阵化简成最简型;从最简型中可以看出线性方程组解的情况。
三、实验工具:计算机和Microsoft Visual C++ 6.0软件。
四、实验原程序代码如下:
#includestdio.h
#includemath.h
#includestdlib.h
#define MAXR 20
#define MAXC 40
float M[MAXC];
float M_B[MAXR][MAXC];
void f1(int m,int n)
{int i,j,r=0,c=0;
float x0;
printf(\n以下过程是将矩阵化为行阶梯型\n);
printf(\n输出初始增广矩阵!\n);
for(i=0;im;i++){
for(j=0;jn;j++)printf(%8.2f,M_B[i][j]); /*原始增广矩阵*/
printf(\n);
}
printf(按任一健继续...\n);
getchar();
while(cn)
{for(i=r;im;i++)if(fabs(M_B[i][c])=0.0001)break;
if(im)
{
if(i!=r)for(j=0;jn;j++)
{
x0=M_B[i][j];
M_B[i][j]=M_B[r][j];
M_B[r][j]=x0;
}
x0=M_B[r][c];
for(j=0;jn;j++)M_B[r][j]/=x0;
for(i=r+1;im;i++)
{
x0=M_B[i][c];
for(j=0;jn;j++)M_B[i][j]-=x0*M_B[r][j];
}
r++;
for(i=0;im;i++)
{
for(j=0;jn;j++)printf(%8.2f,M_B[i][j]);
printf(\n);
}
printf(按任一健继续...\n);
getchar();
}
c++;
if(r==m)break;
}
printf(\n矩阵的行阶梯型如上!\n);
printf(\n以下过程是将行阶梯型化为行最简型\n);
while(r)
{
r--;
for(j=0;jn-1;j++)if(fabs(M_B[r][j])=0.0001)break;
c=j;
for(i=0;ir;i++)
{
x0=M_B[i][c];
for(j=0;jn;j++)M_B[i][j]-=x0*M_B[r][j];
}
for(i=0;im;i++)
{
for(j=0;jn;j++)printf(%8.2f,M_B[i][j]);
printf(\n);
}
printf(按任一健继续...\n);
getchar();
}
float M[MAXC]={0};
int l1,l2;
for (l1=0;l1m;l1++)
{ for(l2=0;l2n;l2++)if(M_B[l1][l2]!=0){M[l2]=1;break;}}
if(M[n-1]=1){printf(该方程无解 !);return;}
for(l1=0;l1m;l1++)
{for(l2=0;l2n;l2++){if(M_B[l1][l2]!=0){M[l2]=M_B[l1][n-1];}}}
printf(输出线性方程组的解:);
for(l2=0;l2n-1;l2++)
printf(x%d(l2+1)=\n,M[l2]);
printf(行最简型即为所求!按任一健退出...\n);
getchar();
}
void main (void)
{
int p,q,m,n;
printf(\n 请输入线性方程组的行数m和列数n:);
scanf(%d %d,m,n);
printf(\n现在输入系数矩阵A和向量b:);
for(p=1;p=m;p++)
{
printf(\n请输入a%d1--a%d%d系数和向量b%d:
您可能关注的文档
最近下载
- 2024-2030年中国人才招聘行业运营模式及发展规划分析报告.docx
- 2022-2023学年山东省青岛市高一(上)期末化学试卷(含解析).pdf VIP
- 2024阜阳市公安局招聘警务辅助人员历年考试试题.docx VIP
- 2024年内部审计工作计划范本(6篇) .pdf VIP
- 李光浦-郑氏星案新诠.doc
- 绵阳东辰5升6考试题及答案.docx
- 中华人民共和国爱国主义教育法的精神.doc VIP
- 宣传品印刷工作(服务)方案的先进性、创新性-技术、经济、质量指标-风险分析等.docx VIP
- 中华人民共和国爱国主义教育法主题班会教案.docx VIP
- JTT 1180.10-2018 交通运输企业安全生产标准化建设基本规范第10部分:水路危险货物运输.pdf
文档评论(0)