Cod sursa(job #2877365)

Utilizator alexmorosanuMorosanu Alexandru alexmorosanu Data 24 martie 2022 17:30:56
Problema Algoritmul lui Gauss Scor 10
Compilator cpp-64 Status done
Runda Arhiva educationala Marime 1.24 kb
#include <fstream>

using namespace std;
ifstream f("gauss.in");
ofstream g("gauss.out");
double a[311][311],x[311];
int n,m,i,j,k,p,l;
int main()
{
    f>>n>>m;
    for(i=1;i<=n;i++)
        for(j=1;j<=m+1;j++)
            f>>a[i][j];
    i=j=1;
    while(i<=n && j<=m)
    {
        for(k=i;k<=n;k++)
            if(a[k][j]!=0)
            break;
        if(k==n+1)
        {
            j++;
            continue;
        }
        if(i!=k)
            for(p=1;p<=m+1;p++)
                swap(a[i][p],a[k][p]);
        for(p=j+1;p<=m+1;p++)
            a[i][p]=a[i][p]/a[i][j];
        a[i][j]=1;
        for(l=i+1;l<=n;l++)
        {
            for(p=j+1;p<=m+1;p++)
                a[l][p]=a[l][p]-a[l][j]*a[i][p];
            a[l][j]=0;
        }
        i++;
        j++;
    }
    for(i=n;i>0;i--)
        for(j=1;j<=m+1;j++)
            if(a[i][j]!=0)
            {
                if(j==m+1)
                {
                    g<<"Imposibil";
                    return 0;
                }
                x[j]=a[i][m+1];
                for(k=j+1;k<=m;k++)
                    x[j]=x[j]-x[k]*a[i][k];
                break;
            }
    for(i=1;i<=m;i++)
        g<<x[i]<<" ";
    return 0;
}