- 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:
您可能关注的文档
最近下载
- 京剧的服装课件.ppt VIP
- 保证供货周期的组织方案和人力资源安排.doc VIP
- 乌有先生历险记(原文,练习,注释,翻译)解读.doc
- 红色经典故事PPT课件.pptx VIP
- (人教版2024)生物七上2.2.1 无脊椎动物(新教材).pptx
- 2023-2024学年江西省上饶市余干县八年级上期中物理试卷附答案解析.pdf
- 西北师范大学教育学理论与实践期末试卷.doc VIP
- 2023年成都信息工程大学数据科学与大数据技术专业《数据结构与算法》科目期末试卷B(有答案).docx VIP
- 河北省衡水中学2024-2025学年高三上学期第一次综合素养测评数学试题(原卷版).docx
- 数据结构(用面向对象方法与C++语言描述)第二版.pdf VIP
文档评论(0)