gauss列主元法的c语言编程实现,Gauss列主元法C语言编程实现.doc

Gauss列主元法C语言编程实现

Gauss列主元法的C语言编程实现

用高斯列主元消去法解线性方程组Ax=b。编程思路:在消元之前,在剩余的元素中选取绝对值最大的为主元,并将其换到主元的位置,以防止出现小数被大数吃掉的现象。然后再将矩阵化为三角矩阵,按照高斯消去法进行计算,最后进行回代求解。

高斯列主元法程序代码如下:

#include#includevoid main(){float array[4][5], x, s; //定义二维数组和浮点变量//int i, j, m, k; //定义整型变量//printf("please input coefficient matrix array:\n"); //输入增广矩阵array//for(i=0; i<4; i++){for(j=0; j<5; j++){scanf("%f", &array[i][j]); //输入一个4*5阶矩阵//}printf("\n");}for(i=0; i<4; i++) //输出输入的矩阵//{for(j=0; j<5; j++){printf("%8.4f",array[i][j]);}printf("\n");}printf("\n\n\n\n\n\n");for(k=0;k<=3;k++) //在相应的列中选主元//{m = k;for(i=k+1;i<=3;i++){x = fabs(array[m][k]);if(fabs(array[i][k] > x))m = i;}printf("%d\n\n\n\n",m);if(array[m][k]==0){printf("ERROR");return;}else //两行进行比较交换两行//{for(j=k;j<=4;j++){x = array[k][j];array[k][j] = array[m][j];array[m][j] = x;

}for(i=0;i<4;i++){for(j=0;j<5;j++){printf("%8.4f ",array[i][j]);}printf("\n");}printf("\n\n\n\n\n\n");for(i=k+1;i<=3;i++){s = array[i][k]/array[k][k]; //消元过程//for(j=0;j<=4;j++){array[i][j] = array[i][j] - s * array[k][j];}

}}}for(i=0;i<4;i++) //输出变换后的矩阵//{for(j=0;j<5;j++){printf("%8.4f", array[i][j]);}printf("\n");}array[3][4] = array[3][4]/array[3][3]; //回代过程//for(i=2;i>=0;i--){x = 0;for(j=i+1;j<4;j++){x = x + array[i][j] * array[j][4];}array[i][4]=(array[i][4] - x) / array[i][i];} printf("x1 = %f", array[0][4]); //输出结果//printf("\n");printf("x2 = %f", array[1][4]);printf("\n");printf("x3

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
#include<stdio.h> #include<math.h> #define N 100 #define epsilon 1e-6 float a[N][N+1]; void menu( ) { printf("\t\t%c%c%c^_^Gauss列主元消去法求解线性方程组^_^%c%c%c\n\n",1,1,1,1,1,1); printf("强烈建议您先阅读以下几点后在运行:\n"); printf("1.这是用Gauus列主元消去法求解线性方程组的应用程序\n"); printf(" (Gauus全主元消去类似可做,读者有兴趣的话可自行而做)\n"); printf("2.请您先了解Gauus列主元消去法的主要思想\n"); } void main( ) { int i,j,k,n; float t,s=0; char choice; menu( ); loop: printf("\n请输入系数方阵的阶数:"); scanf("%d",&n); while(n>0) { printf("\n"); printf("请输入增广阵矩:\n"); for(i=0;i<n;i++) for(j=0;j<n+1;j++) scanf("%f",&a[i][j]);/*存储增广阵矩*/ for(k=0;k<n-1;k++) { for(i=k+1;i<n;i++)/*求出每列中最大数,后行交换*/ if( fabs(a[i][k]) > fabs(a[k][k]) ) for(j=k;j<n+1;j++) { t=a[k][j]; a[k][j]=a[i][j]; a[i][j]=t; } if( fabs(a[k][k]) < epsilon)/*最大数小于很小数时退出*/ { printf("\n错误,Gauss列主元消去法忍受,在%d步退出!\n",k+1); printf("还要再计算其他的么(Y/N)?"); scanf("%c",&choice); if(choice=='Y' || choice=='y')/*判断用户输入*/ goto loop; else return; } for(i=k+1;i<n;i++) { a[i][k]=a[i][k] / a[k][k]; for(j=k+1;j<n+1;j++) a[i][j]=a[i][j]-a[i][k] * a[k][j]; } } a[n-1][n]=a[n-1][n] / a[n-1][n-1]; for(k=n-2;k>=0;k--) { s=0; for(j=k+1;j<n;j++) s+=a[k][j]*a[j][n]; a[k][n]=( a[k][n]-s ) / a[k][k]; } printf("\n*****运行结果*****\n"); for(i=0;i<n;i++) printf(" x[%d]=%.4f\n",i+1,a[i][n]); printf(" 谢谢使用!\n"); printf("还要再计算其他的么(Y/N)?"); getchar( ); scanf("%c",&choice); if(choice=='Y' || choice=='y')/*判断用户输入*/ goto loop; else return; } }

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值