sol
因为交换两个同色的棋子是没有意义的，所以可以视作只有黑色的棋子在棋盘上，每次向相邻的格子移动一步，求最小移动次数。
把每个格子拆成三个点：原点，出点，入点。
考虑一个格子，有且仅有四种情况：初始没有棋子目标也没有棋子，初始没有棋子目标有棋子，初始有棋子目标没有棋子，初始有棋子目标也有棋子。
发现第一种和第四种其实是一样的，所以就只有三种情况了。
初始没有棋子目标也没有棋子
棋子数量守恒，即棋子进入这个格子的次数同等于出去的次数。显然这个次数都不能超过\(\lfloor\frac{c}{2}\rfloor\)，所以原点向出点连\(\lfloor\frac{c}{2}\rfloor\)的边，入点向原点连\(\lfloor\frac{c}{2}\rfloor\)的边。
初始状态没有棋子目标有棋子
棋子数量+1，也就是说棋子进入这个格子的次数比出去的次数多1。那么出去的限制次数就是\(\lfloor\frac{c-1}{2}\rfloor\)，进入的限制次数为\(\lfloor\frac{c+1}{2}\rfloor\)。原点向出点连\(\lfloor\frac{c+1}{2}\rfloor\)的边，入点向原点连\(\lfloor\frac{c-1}{2}\rfloor\)的边，同时从源点\(S\)向原点连\(1\)的边。
初始状态有棋子目标没有棋子
同上理，棋子数量-1，也就是说棋子进入这个格子的次数比出去的次数少1。出去的限制次数\(\lfloor\frac{c+1}{2}\rfloor\)，进入的限制次数\(\lfloor\frac{c-1}{2}\rfloor\)。原点向出点连\(\lfloor\frac{c-1}{2}\rfloor\)的边，入点向原点连\(\lfloor\frac{c+1}{2}\rfloor\)的边，同时从原点向汇点\(T\)连\(1\)的边。
然后相邻的格子，从出点连向入点，容量\(inf\)费用为\(1\)。
注意这题是八联通！
code
#include<cstdio>
#include<algorithm>
#include<cstring>
#include<queue>
using namespace std;
const int N = 80;
const int inf = 1e9;
struct edge{int to,nxt,w,cost;}a[N*N*N];
int n,m,p[N][N],tot,s,t,head[N*N],cnt=1,dis[N*N],vis[N*N],pe[N*N],maxflow,flow,ans;
char st[N][N],ed[N][N],ch[N][N];
queue<int>Q;
void link(int u,int v,int w,int cost)
{
a[++cnt]=(edge){v,head[u],w,cost};
head[u]=cnt;
a[++cnt]=(edge){u,head[v],0,-cost};
head[v]=cnt;
}
bool spfa()
{
memset(dis,63,sizeof(dis));
dis[s]=0;Q.push(s);
while (!Q.empty())
{
int u=Q.front();Q.pop();
for (int e=head[u];e;e=a[e].nxt)
{
int v=a[e].to;
if (a[e].w&&dis[v]>dis[u]+a[e].cost)
{
dis[v]=dis[u]+a[e].cost;pe[v]=e;
if (!vis[v]) vis[v]=1,Q.push(v);
}
}
vis[u]=0;
}
if (dis[t]==dis[0]) return false;
int sum=inf;
for (int i=t;i!=s;i=a[pe[i]^1].to)
sum=min(sum,a[pe[i]].w);
flow+=sum;ans+=sum*dis[t];
for (int i=t;i!=s;i=a[pe[i]^1].to)
a[pe[i]].w-=sum,a[pe[i]^1].w+=sum;
return true;
}
int main()
{
scanf("%d%d",&n,&m);
for (int i=1;i<=n;++i) scanf("%s",st[i]+1);
for (int i=1;i<=n;++i) scanf("%s",ed[i]+1);
for (int i=1;i<=n;++i) scanf("%s",ch[i]+1);
for (int i=1;i<=n;++i)
for (int j=1;j<=m;++j)
p[i][j]=++tot,ch[i][j]-='0';
s=3*tot+1;t=s+1;
for (int i=1;i<=n;++i)
for (int j=1;j<=m;++j)
if (st[i][j]==ed[i][j])
{
link(p[i][j],p[i][j]+tot,ch[i][j]/2,0);
link(p[i][j]+tot+tot,p[i][j],ch[i][j]/2,0);
}
else if (st[i][j]=='1'&&ed[i][j]=='0')
{
link(s,p[i][j],1,0);++maxflow;
link(p[i][j],p[i][j]+tot,(ch[i][j]+1)/2,0);
link(p[i][j]+tot+tot,p[i][j],(ch[i][j]-1)/2,0);
}
else
{
link(p[i][j],t,1,0);
link(p[i][j],p[i][j]+tot,(ch[i][j]-1)/2,0);
link(p[i][j]+tot+tot,p[i][j],(ch[i][j]+1)/2,0);
}
for (int i=1;i<=n;++i)
for (int j=1;j<=m;++j)
{
if (i>1) link(p[i][j]+tot,p[i-1][j]+tot+tot,inf,1);
if (j>1) link(p[i][j]+tot,p[i][j-1]+tot+tot,inf,1);
if (i<n) link(p[i][j]+tot,p[i+1][j]+tot+tot,inf,1);
if (j<m) link(p[i][j]+tot,p[i][j+1]+tot+tot,inf,1);
if (i>1&&j>1) link(p[i][j]+tot,p[i-1][j-1]+tot+tot,inf,1);
if (i>1&&j<m) link(p[i][j]+tot,p[i-1][j+1]+tot+tot,inf,1);
if (i<n&&j>1) link(p[i][j]+tot,p[i+1][j-1]+tot+tot,inf,1);
if (i<n&&j<m) link(p[i][j]+tot,p[i+1][j+1]+tot+tot,inf,1);
}
while (spfa()) ;
printf("%d\n",flow==maxflow?ans:-1);
return 0;
}