Cod sursa(job #2352074)

Utilizator triscacezarTrisca Vicol Cezar triscacezar Data 22 februarie 2019 22:30:00
Problema Algoritmul lui Gauss Scor 100
Compilator cpp-64 Status done
Runda Arhiva educationala Marime 1.3 kb
#include <bits/stdc++.h>

using namespace std;

ifstream f("gauss.in");
ofstream g("gauss.out");

const double kEps=1e-9;

int n,m,i,j,k;
double a[310][310],X[310];

int main()
{
    f>>n>>m;
    for(i=1; i<=n; i++)
        for(j=1; j<=m+1; j++)
            f>>a[i][j];
    i=1,j=1;
    while(i<=n&&j<=m)
    {
        for(k=i; k<=n; k++)
            if(a[k][j]<-kEps||kEps<a[k][j])
                break;
        if(k==n+1)
        {
            j++;
            continue;
        }
        if(i!=k)
            swap(a[i],a[k]);
        for(int u=j+1; u<=m+1; u++)
            a[i][u]/=a[i][j];
        a[i][j]=1;
        for(int u=i+1; u<=n; u++)
        {
            for(int l=j+1; l<=m+1; l++)
                a[u][l]-=a[i][l]*a[u][j];
            a[u][j]=0;
        }
        i++,j++;
    }
    for(i=n; i>=1; i--)
        for(j=1; j<=m+1; j++)
            if(a[i][j]<-kEps||kEps<a[i][j])
            {
                if(j==m+1)
                {
                    g<<"Imposibil\n";
                    return 0;
                }
                X[j]=a[i][m+1];
                for(int k=j+1;k<=m;k++)
                    X[j]-=a[i][k]*X[k];
                break;
            }
    for(i=1;i<=m;i++)
        g<<fixed<<setprecision(10)<<X[i]<<' ';
    return 0;
}