题目

链接：https://xjoi.net/contest/3538/problem/2

另见 SCOI2009 骰子的学问

分析

首先容易发现限制关系是个基环树森林，对于环外的点显然可以优先选择最大的那些数。

然后问题就变成了一个环，思考如何构造。

一种无法理解怎么想到的构造：选定一个结点，然后在这个节点处放一个 x ，然后在父亲放一个 x+1 ，然后放完后从这个结点的父亲开始，放 x+n ，如此循环。

然后特例是 n=3,m=4 ，输出样例即可。

代码

#include
using namespace std;
//#ifdef ONLINE_JUDGE
//  #define getchar() (p1==p2&&(p2=(p1=buf)+fread(buf,1,1<<21,stdin),p1==p2)?EOF:*p1++)
//  char buf[1<<21],*p1=buf,*p2=buf;
//#endif
template
inline void read(T &x){
    x=0;bool f=false;char ch=getchar();
    while(!isdigit(ch)){f|=ch=='-';ch=getchar();}
    while(isdigit(ch)){x=x*10+(ch^48);ch=getchar();}
    x=f?-x:x;
    return ;
}
template
inline void write(T x){
    if(x<0) x=-x,putchar('-');
    if(x>9) write(x/10);
    putchar(x%10^48);
    return ;
}
#define ll long long
#define ull unsigned long long
#define ld long double
#define pb push_back
#define mp make_pair
#define fi first
#define se second
#define pc putchar
#define PII pair
#define rep(i,x,y) for(register int i=(x);i<=(y);i++)
#define dep(i,y,x) for(register int i=(y);i>=(x);i--)
#define repg(i,x) for(int i=head[x];i;i=nex[i])
#define filp(s) freopen(s".in","r",stdin),freopen(s".out","w",stdout)
#define infilp(s) freopen(s".in","r",stdin)
#define outfilp(s) freopen(s".out","w",stdout)
const int MOD=1e9+7;
inline int inc(int x,int y){x+=y;return x>=MOD?x-MOD:x;}
inline int dec(int x,int y){x-=y;return x<0?x+MOD:x;}
inline void incc(int &x,int y){x+=y;if(x>=MOD) x-=MOD;}
inline void decc(int &x,int y){x-=y;if(x<0) x+=MOD;}
inline void chkmin(int &x,int y){if(yx) x=y;}
const int N=205,M=2e5+5,INF=1e9+7;
dequeque;
queueq;
vectorres[N];
int n,m,a[N],ind[N],d[15]={0,0,1,0,2,2,2,1,1,1,0,0,2};
signed main(){
    read(n),read(m);
    for(int i=1;i<=n*m;i++) que.pb(i);
    for(int i=1;i<=n;i++) read(a[i]),ind[a[i]]++;
    if(m<=2) return puts("0"),0;
    for(int i=1;i<=n;i++) if(!ind[i]) q.push(i);
    while(!q.empty()){
        int x=q.front();q.pop();
        for(int i=1;i<=m;i++) res[x].pb(que.back()),que.pop_back();
        ind[a[x]]--;
        if(!ind[a[x]]) q.push(a[x]);
    }
    for(int i=1;i<=n;i++){
        if(!ind[i]) continue;
        int tmp=a[i],k;
        vector ans;
        ans.pb(i),ind[i]=0;
        while(tmp!=i) ans.pb(tmp),ind[tmp]=0,tmp=a[tmp];
        k=ans.size();
        if(k<=2) return puts("0"),0;
        if(k==3&&m==4) for(int j=1;j<=12;j++) res[ans[d[j]]].pb(que.front()),que.pop_front();
        else for(int j=1;j<=m;j++) for(int c=j%k,d=0;d=k?(c+1-k):(c+1)) res[ans[c]].pb(que.back()),que.pop_back();
    }
    for(int i=1;i<=n;i++){
        for(int j=0;j