ZOJ 3780 Paint the Grid Again ( 拓扑排序 )

题目链接

大致题意：
给你一个 $n\ast n$ 的表格，一次涂色能把一行涂成 $X$ 或把一列涂成 $O$ 且每行每列最多执行此操作一次，在用最少次数涂色的前提下，输出字典序最小的涂色方案(列涂色比行涂色小，涂色下标小的较小)。
解题报告：
对于当前位置 $X$ ,先涂 $O$ 再涂 $X$ 即先涂列再涂行。
对于当前位置 $O$ ,先涂 $X$ 再涂 $O$ 即先涂行再涂列。
也就是说对于当前状态它总是由某个前继状态转移过来，进而想到拓扑序列符合这样的性质。
接着就是建图，我们可以这样建立有向边 $($ 前继状态 $->$ 当前状态 $)$ 那么对于这个有向图的拓扑序列即可满足该题要求。
为了区分行和列的涂色，用 $[1,n]$ 表示行操作，$[n,2\ast n]$ 表示列操作。
还要注意下最小化操作次数，例当前行或列全为同一颜色时，显然并不需要它的前继状态相当于拓扑排序中入度为0的那些点。
代码展示：

#include<bits/stdc++.h>
#define LL long long
#define pii pair<int,int>
#define all(x) x.begin(),x.end()
#define mem(a, b) memset(a,b,sizeof(a))
using namespace std;
const int maxn = 505;
const int MOD = 1e9 + 7;

inline int read() {
    int s = 0, f = 1;
    char ch = getchar();
    while (ch < '0' || ch > '9') {
        if (ch == '-') f = -1;
        ch = getchar();
    }
    while (ch >= '0' && ch <= '9') {
        s = (s << 1) + (s << 3) + ch - '0';
        ch = getchar();
    }
    return s * f;
}
inline void write(LL x) {
    if (x < 0) x = -x, putchar('-');
    if (x > 9) write(x / 10);
    putchar(x % 10 + '0');
}
char mp[maxn][maxn];
struct TMD{
    int to,next;
}edge[maxn*maxn];
int cnt,head[maxn<<1],in[maxn<<1];
bool vis[maxn<<1];
vector<int>g;
priority_queue<int,vector<int>,greater<int> >q;
void add(int from,int to){
    edge[++cnt]={to,head[from]};head[from]=cnt;
}
bool topsort(int n){
    while (!q.empty()) q.pop();
    for(int i=1;i<=2*n;i++){
        if(!in[i]) {
            q.push(i);vis[i]=true;
        }
    }
    while (!q.empty()){
        int t=q.top();
        q.pop();
        g.push_back(t);
        for(int i=head[t];i;i=edge[i].next){
            int to=edge[i].to;
            in[to]--;
            if(!in[to]) q.push(to);
        }
    }
    for(int i=1;i<=2*n;i++){
        if(in[i]) return false;
    }return true;
}
int main() {
    ios::sync_with_stdio(NULL);cin.tie(NULL);cout.tie(NULL);
    int T,n;
    cin>>T;
    while (T--) {
        g.clear();
        mem(head,0);mem(vis,false);mem(in,0);
        cin>>n;cnt=0;
        for(int i=1;i<=n;i++){
            cin>>mp[i];
            for(int j=0;j<n;j++){
                if(mp[i][j]=='X'){
                    add(n+j+1,i);
                    in[i]++;
                }else{
                    add(i,n+j+1);
                    in[n+j+1]++;
                }
            }
        }
        if(topsort(n)){
            int len=g.size();
            for(int i=0;i<len;i++){
                if(vis[g[i]]) continue;
                cout<<((g[i]>n)?'C':'R')<<((g[i]>n)?g[i]-n:g[i])<<((i==len-1)?'\n':' ');
            }
        }else cout<<"No solution"<<'\n';
    }
    return 0;
}