高斯消元解线性方程组

高斯消元解线性方程组

输入一个包含 n 个方程 n 个未知数的线性方程组。

方程组中的系数为实数。

求解这个方程组。

下图为一个包含 m 个方程 n 个未知数的线性方程组示例：

输入格式
第一行包含整数 n。

接下来 n 行，每行包含 n+1 个实数，表示一个方程的 n 个系数以及等号右侧的常数。

输出格式
如果给定线性方程组存在唯一解，则输出共 n 行，其中第 i 行输出第 i 个未知数的解，结果保留两位小数。

如果给定线性方程组存在无数解，则输出 Infinite group solutions。

如果给定线性方程组无解，则输出 No solution。

数据范围
1≤n≤100,
所有输入系数以及常数均保留两位小数，绝对值均不超过 100。

输入样例：
3
1.00 2.00 -1.00 -6.00
2.00 1.00 -3.00 -9.00
-1.00 -1.00 2.00 7.00
输出样例：
1.00
-2.00
3.00

#include<iostream>
#include<algorithm>
#include<cmath>
using namespace std;
const int N=110;
const double eps=1e-6;//1的-6次方，比这个数还小，就认定为0


int n;
double a[N][N];

int gauss()
{
    int c,r;//c代表列，r代表行
    for(c=0,r=0;c<n;c++)
    {
        int t=r;//先找到当前这一列，绝对值最大的一个数字所在的行号
        for(int i=r;i<n;i++)
         if(fabs(a[i][c])>fabs(a[t][c]))
            t=i;

        if(fabs(a[t][c])<eps)continue;//如果当前这一列的最大数都是0，那么所有数都是0，那就直接到下一列

        for(int i=c;i<n+1;i++)swap(a[t][i],a[r][i]);//把当前这一行换到最上面
        for(int i=n;i>=c;i--)a[r][i]/=a[r][c];//把这一行的第一列数变为1
        for(int i=r+1;i<n;i++)//把当前列下面的所有数都消成0
           if(fabs(a[i][c])>eps)//如果非0 再操作，已经是0就没必要再操作了，直接下一行
              for(int j=n;j>=c;j--)//从后往前，当前行的每个数字，都分别减去 上一行*当前列的数，模拟一下就知道啦
               a[i][j]-=a[r][j]*a[i][c];

        r++;
    }

    if(r<n)//说明剩下方程的个数是小于n的，说明不是唯一解，判断是无解还是无穷多解
    {//因为已经是阶梯型，所以上面计算出的r~n-1的值应该都为0
        for(int i=r;i<n;i++)
          if(fabs(a[i][n])>eps)//左边=0，右边！=0，所以为无解
          return 2;

        return 1;//否则，左边=0，右边=0，就是r~n-1的方程都是多余方程
    }
    //唯一解，从下往上回代，得到方程的解
    for(int i=n-1;i>=0;i--)
      for(int j=i+1;j<n;j++)
        a[i][n]-=a[j][n]*a[i][j];//从下往上把上三角的数消为0

        return 0;//有唯一解
}


int main()
{
    cin>>n;
    for(int i=0;i<n;i++)
      for(int j=0;j<n+1;j++)
         cin>>a[i][j];

    int t=gauss();

    if(t==0){
        for(int i=0;i<n;i++)printf("%.2lf\n",a[i][n]);
    }
    else if(t==1)puts("Infinite group solutions");//无数解
    else puts("No solution");//无解
    return 0;
}

所以说，高斯消元法和克林姆法则还是有点区别的，我在说什么呢，线性代数课没学好，我真是走马观花，我恨