Cod sursa(job #2496117)

Utilizator AndreiD31Dragan Andrei AndreiD31 Data 20 noiembrie 2019 11:24:11
Problema Flux Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 2.64 kb
#include <bits/stdc++.h>

using namespace std;

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

int use[105];
vector<int>V[105];

void dfs(int nod)
{
    int vecin;

    use[nod]=1;

    for(int i=0;i<V[nod].size();i++)
    {
        vecin=V[nod][i];
        if(!use[vecin])dfs(vecin);
    }
}

struct flux
{
    int x,y,c;
}v[5010];

int n,k,col,m,i,j;
long double mini=LONG_LONG_MAX,suma,a[105][105],sol[105];

int main()
{
    f>>n>>m;
    for(i=1; i<=m; i++)
    {
        f>>v[i].x>>v[i].y>>v[i].c;

        V[v[i].x].push_back(v[i].y);
        V[v[i].y].push_back(v[i].x);

        a[v[i].x][v[i].x]++;
        a[v[i].y][v[i].y]++;

        a[v[i].x][v[i].y]--;
        a[v[i].y][v[i].x]--;
    }

    for(i=1; i<=n+1; i++)
    {
        a[1][i]=0;
    }
    a[1][1]=1;
    a[n][n+1]=1;

    // GAUSS
    i=2;j=2;
    while(i<=n && j<=n)
    {
        for(k=i;k<=n;k++)
            if(a[k][j]!=0) break;

        if(k==n+1)
        {
            i++;
            j++;
            continue;
        }

        if(k!=i) // interschimb liniile
        {
            for(col=j;col<=n+1;col++)
            {
                swap(a[i][col],a[k][col]);
            }
        }


        // de acum incolo, am facut interschimbarea si lucrez cu i, nu cu k

        for(col=j+1;col<=n+1;col++)
            a[i][col]=a[i][col]/a[i][j];

        a[i][j]=1; // abia la final fac a[i][j]=1, pentru ca altfel se modifica pe parcurs

        for(k=i+1;k<=n;k++)
        {
            for(col=j+1;col<=n+1;col++)
                a[k][col]-=a[k][j]*a[i][col];

            a[k][j]=0; // abia acum il fac 0
        }

        i++;
        j++;
    }

    for(i=n;i>=2;i--)
    {
        for(j=2;j<=n+1;j++)
        {
            if(abs(a[i][j]) > 0.00000001)
            {
                if(j==n+1) // am ajuns la coada si rezulta ca 0 = a[i][j]
                {
                   g<<0;
                   return 0;
                }

                sol[j]=a[i][n+1];
                for(k=j+1;k<=n;k++)
                    sol[j]-=sol[k]*a[i][k]; // ii scad pe cei anteriori

                break; // nu mai avansez cu j-ul odata ce am gasit un coeficient nenul
            }
        }
    }

    for(i=1;i<=m;i++)
    {
        long double rez=v[i].c/(abs(sol[v[i].x]-sol[v[i].y]));
        if(mini>rez)mini=rez;
    }

    dfs(1); // daca nu exista drum de la 1 la n, atunci nu conteaza!!
    if(use[n]==0)
    {
        g<<0;
        return 0;
    }

    if(mini==INT_MAX)
    {
        g<<0;
        return 0;
    }

    g<<fixed<<setprecision(6)<<mini;
    return 0;
}