Cod sursa(job #1243608)

Utilizator dobrebogdanDobre Bogdan Mihai dobrebogdan Data 16 octombrie 2014 08:14:32
Problema Algoritmul lui Gauss Scor 90
Compilator cpp Status done
Runda Arhiva educationala Marime 1.22 kb
#include<cstdio>
#include<cmath>
#define eps 1.e-5
double a[310][310];
int po[310];
int main()
{
    freopen("gauss.in","r",stdin);
    freopen("gauss.out","w",stdout);
    int n,m,i,j,x;
    bool te=1;
    double amp;
    scanf("%d%d",&n,&m);
    if(m<n)
        te=0;
    m++;
    for(i=1;i<=n;i++)
    {
     for(j=1;j<=m;j++)
      scanf("%lf",&a[i][j]);
    po[i]=i;
    }
    for(i=n;i>=1;i--)
    {
        for(j=i-1;j>=0;j--)
        if(fabs(a[po[j]][i])>=eps)
        {
            x=po[i];
            po[i]=po[j];
            po[j]=x;
            break;
        }
        for(j=i-1;j>=0;j--)
         if(fabs(a[po[j]][i])>=eps)
        {
            amp=a[po[j]][i]/a[po[i]][i];
            for(x=1;x<=m;x++)
                a[po[j]][x]=a[po[j]][x]-a[po[i]][x]*amp;
        }

    }
    for(i=1;i<=n;i++)
        if(fabs(a[po[i]][i])<eps)
        te=0;
    for(i=2;i<=n;i++)
        for(j=i-1;j>=1;j--)
    {
        amp=a[po[i]][j]/a[po[j]][j];
        a[po[i]][j]=0;
        a[po[i]][m]=a[po[i]][m]-a[po[j]][m]*amp;
    }
    if(te==0)
        printf("Imposibil\n");
    else
    {
    for(i=1;i<m;i++)
        printf("%lf ",a[po[i]][m]/a[po[i]][i]);
    }
    return 0;
}