C语言 用列主元高斯消去法解方程组,输出方程组的解及矩阵L和U
时间: 2023-09-16 18:08:54 浏览: 273
好的,我来给您讲解一下。
首先,列主元高斯消去法是一种线性方程组求解的方法,其基本思路是将系数矩阵通过一系列的初等变换,转化为上三角矩阵,然后再通过回代求解得到方程组的解。
C语言实现列主元高斯消去法的步骤如下:
1. 定义系数矩阵A和右端向量b,以及n个未知数的解向量x。
2. 将A和b合并成增广矩阵Ab。
3. 从第一行开始,每次选取当前行及其以下所有行中绝对值最大的元素作为主元素,并将其所在的行与当前行交换位置。
4. 对于每一行i,将第i列以下的所有元素消为0,即用第i行乘以一个系数k,加到第i+1行至第n行上。
5. 得到上三角矩阵后,通过回代求解x。
以下是C语言代码实现:
```c
#include <stdio.h>
#include <math.h>
#define N 3 // 未知数个数
int main()
{
int i, j, k;
double A[N][N+1], x[N], L[N][N], U[N][N];
double temp, max, pivot;
// 输入系数矩阵A和右端向量b
printf("请输入系数矩阵A和右端向量b:\n");
for(i=0; i<N; i++)
{
for(j=0; j<N+1; j++)
{
scanf("%lf", &A[i][j]);
}
}
// 初始化L和U
for(i=0; i<N; i++)
{
for(j=0; j<N; j++)
{
if(i == j)
{
L[i][j] = 1.0;
}
else
{
L[i][j] = 0.0;
}
U[i][j] = 0.0;
}
}
// 列主元高斯消去
for(k=0; k<N-1; k++)
{
// 选取主元
max = 0;
for(i=k; i<N; i++)
{
if(fabs(A[i][k]) > max)
{
max = fabs(A[i][k]);
pivot = A[i][k];
j = i;
}
}
if(max == 0)
{
printf("主元为0,无唯一解!\n");
return 1;
}
// 交换行
if(j != k)
{
for(i=0; i<N+1; i++)
{
temp = A[k][i];
A[k][i] = A[j][i];
A[j][i] = temp;
}
}
// 消元
for(i=k+1; i<N; i++)
{
temp = A[i][k] / pivot;
L[i][k] = temp;
for(j=k; j<N+1; j++)
{
A[i][j] = A[i][j] - temp * A[k][j];
}
}
}
// 输出上三角矩阵U
printf("上三角矩阵U:\n");
for(i=0; i<N; i++)
{
for(j=0; j<N; j++)
{
printf("%8.3lf ", A[i][j]);
U[i][j] = A[i][j];
}
printf("\n");
}
// 输出下三角矩阵L
printf("下三角矩阵L:\n");
for(i=0; i<N; i++)
{
for(j=0; j<N; j++)
{
if(i > j)
{
printf("%8.3lf ", L[i][j]);
}
else
{
printf("%8.3lf ", 0.0);
}
}
printf("\n");
}
// 回代求解x
x[N-1] = A[N-1][N] / A[N-1][N-1];
for(i=N-2; i>=0; i--)
{
temp = 0;
for(j=i+1; j<N; j++)
{
temp += A[i][j] * x[j];
}
x[i] = (A[i][N] - temp) / A[i][i];
}
// 输出解向量x
printf("方程组的解向量x:\n");
for(i=0; i<N; i++)
{
printf("%8.3lf ", x[i]);
}
printf("\n");
return 0;
}
```
希望能对您有所帮助!
阅读全文
相关推荐


















