bzoj2132 圈地计划（最小割）

首先假设我们把所有收益都吃了x。然后删掉最少的收益使得方案合法。
二分图染色，黑点向T建边，容量为a，s向黑点建边，容量为b，白点向T建边，容量为b，s向白点建边，容量为a，白点向相邻的黑点建双向边，容量为两点c之和。全部收益-最小割就是答案。因为这样的话你至少会删掉每个点的其中一种建筑，保证每个位置只建了一个。而且如果你使得相邻的两个位置建了相同的建筑，一定还会删掉他俩之间的边的贡献。

#include <cstdio>
#include <cstring>
#include <algorithm>
#include <queue>
using namespace std;
#define ll long long
#define inf 0x3f3f3f3f
#define N 10010
inline int read(){
    int x=0,f=1;char ch=getchar();
    while(ch<'0'||ch>'9'){if(ch=='-')f=-1;ch=getchar();}
    while(ch>='0'&&ch<='9') x=x*10+ch-'0',ch=getchar();
    return x*f;
}
int n,m,id[110][110],h[N],num=1,T=10001,lev[N],ans=0,cur[N],c[110][110];
int owo=0,dx[]={0,0,1,-1},dy[]={1,-1,0,0};
struct edge{
    int to,next,val;
}data[120000];
inline void add(int x,int y,int val,int op){
    data[++num].to=y;data[num].next=h[x];h[x]=num;data[num].val=val;
    data[++num].to=x;data[num].next=h[y];h[y]=num;data[num].val=val*op;
}
inline bool bfs(){
    queue<int>q;memset(lev,0,sizeof(lev));
    lev[0]=1;q.push(0);
    while(!q.empty()){
        int x=q.front();q.pop();
        for(int i=h[x];i;i=data[i].next){
            int y=data[i].to;if(lev[y]||!data[i].val) continue;
            lev[y]=lev[x]+1;q.push(y);
        }
    }return lev[T];
}
inline int dinic(int x,int low){
    if(x==T) return low;int tmp=low;
    for(int i=h[x];i;i=data[i].next){
        int y=data[i].to;if(lev[y]!=lev[x]+1||!data[i].val) continue;
        int res=dinic(y,min(data[i].val,tmp));
        if(!res) lev[y]=0;else tmp-=res,data[i].val-=res,data[i^1].val+=res;
        if(!tmp) return low;
    }return low-tmp;
}
int main(){
//  freopen("a.in","r",stdin);
    n=read();m=read();
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j) id[i][j]=++owo;
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            int x=read();ans+=x;
            (i+j)&1?add(id[i][j],T,x,0):add(0,id[i][j],x,0);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            int x=read();ans+=x;
            (i+j)&1?add(0,id[i][j],x,0):add(id[i][j],T,x,0);
        }
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j) c[i][j]=read();
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j){
            if((i+j)&1) continue;
            for(int k=0;k<4;++k){
                int xx=i+dx[k],yy=j+dy[k];
                if(xx<1||xx>n||yy<1||yy>m) continue;ans+=c[i][j]+c[xx][yy];
                add(id[i][j],id[xx][yy],c[i][j]+c[xx][yy],1);
            }
        }
    while(bfs()){memcpy(cur,h,sizeof(cur));ans-=dinic(0,inf);}
    printf("%d\n",ans);
    return 0;
}