Cod sursa(job #2448040)

Utilizator CharacterMeCharacter Me CharacterMe Data 15 august 2019 15:26:22
Problema Adapost Scor 0
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 3.58 kb
#include <bits/stdc++.h>
#define pdd pair<double, double>
#define pdi pair<double, int>
#define inf 1000000000
///N=400
using namespace std;
///
int n, i, j, k, s, d, cnt, l, r, mid;
int flow[801][801], last[801], lft[801], rgt[801];
double outone, outall;
double cost[801][801], dlist[16001], dmin[801], now[801], then[801];
pdd plist[801];
vector<int> graph[805];
priority_queue<pdi, vector<pdi>, greater<pdi> > pq;
///
void read();
void solve();
void write();
double calc(pdd node1, pdd node2);
bool dij(double val);
bool CM(double val);
bool dfs(int node, double val);
int main()
{
    read();
    solve();
    write();
    return 0;
}
void read(){
    freopen("adapost.in", "r", stdin);
    scanf("%d", &n);
    for(i=1; i<=2*n; ++i) scanf("%lf%lf", &plist[i].first, &plist[i].second);
    fclose(stdin);
    return;
}
void solve(){
    s=0, d=2*n+1;
    for(i=1; i<=n; ++i)
    for(j=n+1; j<=2*n; ++j){
        double dist=calc(plist[i], plist[j]);
        cost[i][j]=dist;
        cost[j][i]=-dist;
        flow[i][j]=1;
        dlist[++cnt]=dist;
        graph[i].push_back(j);
        graph[j].push_back(i);
    }
    sort(dlist+1, dlist+n*n+1);
    l=1; r=n*n;
    while(l<=r){
        mid=(l+r)/2;
        if(CM(dlist[mid])) r=mid-1;
        else l=mid+1;
    }
    for(i=1; i<=n; ++i) {
        flow[s][i]=1;
        graph[s].push_back(i);
        graph[i].push_back(s);
    }
    for(i=n+1; i<=2*n; ++i) {
        flow[i][d]=1;
        graph[i].push_back(d);
        graph[d].push_back(i);
    }
    while(dij(outone)){
        int p, maxflow=inf;
        for(p=d; p!=s; p=last[p]) maxflow=min(maxflow, flow[last[p]][p]);
        for(p=d; p!=s; p=last[p]){
            flow[last[p]][p]-=maxflow;
            flow[p][last[p]]+=maxflow;
            outall+=cost[last[p]][p];
        }
    }
    return;
}
void write(){
    freopen("adapost.out", "w", stdout);
    printf("%fl %fl", outone, outall);
    return;
}
double calc(pdd node1, pdd node2){
    return sqrt((node1.first-node2.first)*(node1.first-node2.first)+(node1.second-node2.second)*(node1.second-node2.second));
}
bool dij(double val){
    for(i=s; i<=d; ++i) last[i]=-1, dmin[i]=inf;
    dmin[s]=now[s]=0.0;
    pq.push({0, s});
    while(!pq.empty()){
        double cst=pq.top().first;
        int node=pq.top().second;
        pq.pop();
        if(node==d) continue;
        if(cst>dmin[node]) continue;
        for(auto next:graph[node]){
            if(!flow[node][next]) continue;
            if(cost[node][next]>val) continue;
            double nextc=cst+cost[node][next]+then[node]-then[next];
            if(nextc<dmin[next]){
                dmin[next]=nextc;
                now[next]=now[node]+cost[node][next];
                last[next]=node;
                pq.push({nextc, next});
            }
        }
    }
    for(i=s; i<=d; ++i) then[i]=now[i];
    return dmin[d]!=inf;
}
bool CM(double val){
    for(i=1; i<=2*n; ++i) lft[i]=rgt[i]=0;
    bool done;
    do{
        done=false;
        for(i=1; i<=n; ++i) if(!rgt[i] && dfs(i, val)) done=true;
    }while(done);
    done=true;
    for(i=1; i<=n; ++i) if(!rgt[i]) {done=false; break;}
    if(done==true) outone=val;
    return done;
}
bool dfs(int node, double val){
    for(auto next:graph[node]) if(cost[node][next]<=val && !lft[next]){
        lft[next]=node;
        rgt[node]=next;
        return true;
    }
    for(auto next:graph[node]) if(cost[node][next]<=val && dfs(lft[next], val)){
        lft[next]=node;
        rgt[node]=next;
        return true;
    }
    return false;
}