結果

問題 No.2986 Permutation Puzzle
ユーザー tails
提出日時 2024-12-11 17:20:45
言語 cLay
(20241019-1)
結果
WA  
実行時間 -
コード長 989 bytes
コンパイル時間 3,507 ms
コンパイル使用メモリ 181,764 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-12-11 17:20:51
合計ジャッジ時間 5,306 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample WA * 4
other WA * 40
権限があれば一括ダウンロードができます

ソースコード

diff # 

ll n,a[5][10][10],b[10][10],h[4][3];

bool f(ll z){
	if(z==0){
		rep(y,n){
			rep(x,n){
				if(a[0][y][x]!=b[y][x]){
					return false;
				}
			}
		}
		return true;
	}
	--z;
	rep(p,n){
		rep(y,n){
			rep(x,n){
				a[z][a[z+1][p][y]][x]=a[z+1][y][x];
			}
		}
		if(f(z)){
			h[z][0]=1;
			h[z][1]=p;
			return true;
		}
	}
	rep(p,n){
		rep(y,n){
			rep(x,n){
				a[z][y][a[z+1][x][p]]=a[z+1][y][x];
			}
		}
		if(f(z)){
			h[z][0]=0;
			h[z][1]=p;
			return true;
		}
	}
	return false;
}

{
	ll k;
	rd(n,k,(a[k]--)(n,n),(b--)(n,n));
	f(k);
	ll m=0;
	IntMap c(n);
	rrep(z,k){
		if(h[z][0]){
			rep(x,n){
				c[x]=a[z+1][h[z][1]][x];
			}
		}else{
			rep(y,n){
				c[y]=a[z+1][y][h[z][1]];
			}
		}
		ll n=c.calcCycle();
		m+=h[z][2]=lcm[i,0,n](c.cycleLen[i])-1;
	}
	wt(m);
	rrep(z,k){
		ll p=h[z][1];
		ll q[1000];
		rep(i,h[z][2]){
			q[i]=p;
			if(h[z][0]){
				p=a[z+1][h[z][2]][p];
			}else{
				p=a[z+1][p][h[z][2]];
			}
		}
		rrep(i,h[z][2]){
			wt(h[z][0]?'R':'C',q[i]+1);
		}
	}
}
0