Cod sursa(job #64940)

Utilizator fireatmyselfBogdan-Alexandru Stoica fireatmyself Data 6 iunie 2007 14:14:11
Problema Adapost Scor 5
Compilator cpp Status done
Runda Arhiva de probleme Marime 3.86 kb
#include <cstdio>
#include <cstring>
#include <cmath>
#include <vector>
#include <algorithm>


#define NMAX 404
#define QMAX ((1<<14)-1)
#define MMAX 2*404
#define INF 666000666
#define eps 1e-4
#define f first
#define s second

using namespace std;

int N, Cup[NMAX], F[NMAX], T, Fl[MMAX][MMAX], Flow, C[MMAX][MMAX];
vector<pair<double,int> > D[NMAX];
double X[NMAX], Y[NMAX], Rmin, Dmin, Dd[MMAX][MMAX], Dist[MMAX];
int t[MMAX], Q[QMAX+10], inQ[MMAX];

void read()
{
        int i, j;
        double x, y;

        freopen("adapost.in", "r", stdin);
        scanf("%d", &N);

        for (i = 0; i < MMAX; i++)
            for (j = 0; j < MMAX; j++) Dd[i][j] = INF+1;

        for (i = 1; i <= N; i++)
            { scanf("%lf %lf", &X[i], &Y[i]); D[i].push_back(make_pair(-INF,0)); }

        for (i = 1; i <= N; i++)
        {
                scanf("%lf %lf", &x, &y);
                for (j = 1; j <= N; j++)
                {
                    D[j].push_back(make_pair(sqrt( (X[j]-x)*(X[j]-x) + (Y[j]-y)*(Y[j]-y) ), i));
                    Dd[j][N+i] = Dd[N+i][j] = D[j][i].f;
                }
        }
        T = 2*N+1;

        for (i = 1; i <= N; i++) sort(D[i].begin(), D[i].end());
}

int pairthembaby(int i, double dmax)
{
        int j, x;
        
        if (F[i]) return 0;
        F[i] = 1;
        for (j = 1; j <= N && D[i][j].f <= dmax; j++)
            if ((!Cup[ D[i][j].s ]) || (pairthembaby(Cup[D[i][j].s], dmax)))
            {
                Cup[ D[i][j].s ] = i;
                return 1;
            }
        return 0;
}

void joint(double dmax)
{
        int i;

        for (i = 1; i <= N; i++)
            if (!pairthembaby(i,dmax))
            {
                memset(F,0,sizeof(F));
                pairthembaby(i,dmax);
            }
}

int bf(int tap)
{
        int i, j, lo, hi;

        for (i = 0; i < MMAX; i++)
            t[i] = inQ[i] = 0, Dist[i] = INF;

        Dist[tap] = 0; t[tap] = -1; inQ[tap] = 1; Q[0]=tap;

        for (lo=0,hi=1; lo!=hi && !t[T]; lo=(lo+1)&QMAX)
        {
                i = Q[lo];
                for (j = 0; j <= T; j++)
                      if ( (Fl[i][j]<0) && (Dist[j]>Dist[i]-Dd[i][j]) )
                      {
                          Dist[j] = Dist[i]-Dd[i][j];
                          t[j] = i;
                          if (!inQ[j]) inQ[j] = 1, Q[hi] = j, hi=(hi+1)&QMAX;
                      }
                      else
                      if ( (Fl[i][j]<C[i][j]) && (Dist[j]>Dist[i]+Dd[i][j]) )
                      {
                          Dist[j] = Dist[i]+Dd[i][j];
                          t[j] = i;
                          if (!inQ[j]) inQ[j] = 1, Q[hi] = j, hi=(hi+1)&QMAX;
                       }
        }

        if (Dist[T]<INF)
        {
          Flow++;
          Dmin += Dist[T];
          for (i=T; i>0; i=t[i])
              Fl[t[i]][i]++, Fl[i][t[i]]--;
          return 1;
        }
        return 0;
}

void solve()
{
        int flow, i, j;
        double lo = 0, hi = (1<<28), mij;

        while (lo<=hi)
        {
                mij = (lo+hi)/2.0;
                memset(Cup,0,sizeof(Cup));
                joint(mij);
                for (i = 1, flow = 0; i <= N; i++) flow += (Cup[i]>0);
                if (flow == N) Rmin = mij, hi = mij-eps;
                else lo = mij+eps;
        }

        for (i = 1; i <= N; i++)
            for (j = 1; j <= N; j++)
                if (Dd[i][N+j]<=Rmin) C[i][N+j] = 1;

        for (i = 1; i <= N; i++) Dd[0][i] = 0, C[0][i] = 1;
        for (i = N+1; i < T; i++) Dd[i][T] = 0, C[i][T] = 1;
        while (bf(0) && Flow < N);
}

void write()
{
        freopen("adapost.out", "w", stdout);
        printf("%lf %lf\n", Rmin, Dmin);
}

int main()
{
        read();
        solve();
        write();
        return 0;
}