Cod sursa(job #71037)

Utilizator moga_florianFlorian MOGA moga_florian Data 8 iulie 2007 23:11:35
Problema Adapost Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 3.51 kb
using namespace std;
#include<fstream>
#include<stdio.h>
#include<math.h>
#define Nmax 405
#define inf 100000000.0

int N;
double cxad[Nmax],cyad[Nmax],cxsol[Nmax],cysol[Nmax],dist[Nmax*Nmax],init[Nmax][Nmax];
double cost[2*Nmax][2*Nmax],flux[2*Nmax];
char cap[2*Nmax][2*Nmax];
int q[Nmax*Nmax],ant[Nmax];

ifstream fin("adapost.in");
FILE *fout=fopen("adapost.out","w");

double flow(double Vmax)
{
int i,j;
   
//initializare
for(i=1;i<=N;i++)
  for(j=1;j<=N;j++)  
     {
     cap[j+N][i]=0;
          
     if(init[i][j] <= Vmax)
        {
        cost[i][j+N]=init[i][j];
        cost[j+N][i]=-init[i][j];
        cap[i][j+N]=1;           
        }
     else
        cap[i][j+N]=0;                         
     }
     
for(i=1;i<=N;i++)
   {
   cap[0][i]=cap[i+N][2*N+1]=1;
   cap[i][0]=cap[2*N+1][i+N]=0;
   cost[0][i]=cost[i+N][2*N+1]=0.0;              
   cost[i][0]=cost[2*N+1][i+N]=0.0;
   }
     
int X,dest=2*N+1,ori=0,li,lf;
double F=0.0;


while(1)
{        
for(i=1;i<=2*N+1;i++) 
   flux[i]=inf;
flux[0]=0.0;
li=1;lf=1;
q[1]=0;

while(li<=lf)
    {
    X=q[li];
    
    if(X<=N && X>0)
       {
       for(i=N+1;i<=2*N;i++)
          if(cap[X][i] && flux[i] > flux[X] + cost[X][i] && flux[X] + cost[X][i] <= flux[dest])
              {
              flux[i]=flux[X]+cost[X][i];
              ant[i]=X;
              
              q[++lf]=i;
              }               
       }
    else
       {
       for(i=1;i<=N;i++)
          if(cap[X][i] && flux[i] > flux[X] + cost[X][i] && flux[X] + cost[X][i] <= flux[dest])
              {
              flux[i]=flux[X]+cost[X][i];
              ant[i]=X;
              
              q[++lf]=i;
              }
              
       if(cap[X][dest] && flux[dest]> flux[X] + cost[X][dest])
              {
              flux[dest]=flux[X]+cost[X][dest];
              ant[dest]=X;              
              }
       }
    li++;
    }

if(flux[dest] == inf)
   if(ori==N)
      return F;
   else
      return -1.0;

i=dest;
while(i>0)
   {
   cap[ant[i]][i]=0;
   cap[i][ant[i]]=1;
   i=ant[i];       
   }
   
F+=flux[dest];   
ori++;
}
  
}

int main()
{
int i,j,k;
double dx,dy,val,aux;

fin>>N;
for(i=1;i<=N;i++)
   fin>>cxsol[i]>>cysol[i];
for(i=1;i<=N;i++)
   fin>>cxad[i]>>cyad[i];
   
k=0;
for(i=1;i<=N;i++)
  for(j=1;j<=N;j++)
     {
     dx=cxsol[i] - cxad[j];
     dy=cysol[i] - cyad[j];
     
     init[i][j]= sqrt(dx*dx + dy*dy);
     
     dist[++k]=init[i][j];
     }
     
for(i=1;i<=N*N;i++)
     {
     j=i;
     while(j/2 && dist[j/2] < dist[j]) 
        {
        aux=dist[j/2];
        dist[j/2]=dist[j];
        dist[j]=aux;
        
        j/=2;
        }              
     }
     
i=N*N;
while(i>1)
 {
 aux=dist[1];
 dist[1]=dist[i];
 dist[i]=aux;
 i--;
 
 j=1;
 while(1)
   {
   k=j*2;
   if(k>i) break;
   if(k+1<=i && dist[k+1] > dist[k]) k++;
   if(dist[j] >= dist[k]) break;
   
   aux=dist[j];
   dist[j]=dist[k];
   dist[k]=aux;
   j=k;      
   }         
 }

int li,lf,mij;
double distMin,totalMin;
li=1;
lf=1;
for(i=2;i<=N*N;i++)
   if(dist[i] != dist[i-1])
       dist[++lf]=dist[i];       

while(li<=lf)
  {
  mij=(li+lf)>>1;
  val=flow(dist[mij]);
  if( val >= 0.0 )
      {
      distMin= dist[mij];
      totalMin= val;
      
      lf=mij-1;             
      }
  else
      li=mij+1;  
  }

  
fprintf(fout,"%f %f\n",distMin,totalMin);
fin.close();
fclose(fout);
return 0;    
}