#905500 (cLay) No.2428 Returning Shuffle

• 問題: No.2428 Returning Shuffle
• ユーザー: tails
• 提出日時: 2023-08-18 22:07:40
• 言語: cLay (20240714-1)
• 結果: AC
• 実行時間: 117 ms / 2,000 ms
• コード長: 384 bytes
• コンパイル時間: 9,108 ms
• コンパイル使用メモリ: 227,860 KB
• 実行使用メモリ: 18,944 KB
• 最終ジャッジ日時: 2024-11-28 07:23:13
• 合計ジャッジ時間: 11,245 ms
• ジャッジサーバーID （参考情報）: judge3 / judge2

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	39 ms; 18,944 KB
testcase_01	AC	75 ms; 18,944 KB
testcase_02	AC	94 ms; 18,816 KB
testcase_03	AC	12 ms; 9,728 KB
testcase_04	AC	12 ms; 9,984 KB
testcase_05	AC	12 ms; 9,984 KB
testcase_06	AC	12 ms; 9,856 KB
testcase_07	AC	12 ms; 9,984 KB
testcase_08	AC	12 ms; 9,856 KB
testcase_09	AC	12 ms; 9,984 KB
testcase_10	AC	12 ms; 9,856 KB
testcase_11	AC	12 ms; 9,856 KB
testcase_12	AC	12 ms; 9,728 KB
testcase_13	AC	12 ms; 9,984 KB
testcase_14	AC	12 ms; 9,984 KB
testcase_15	AC	11 ms; 9,984 KB
testcase_16	AC	12 ms; 9,728 KB
testcase_17	AC	12 ms; 9,984 KB
testcase_18	AC	12 ms; 9,984 KB
testcase_19	AC	74 ms; 18,816 KB
testcase_20	AC	81 ms; 18,944 KB
testcase_21	AC	13 ms; 9,856 KB
testcase_22	AC	12 ms; 9,984 KB
testcase_23	AC	12 ms; 9,984 KB
testcase_24	AC	117 ms; 18,816 KB
testcase_25	AC	96 ms; 18,816 KB

ソースコード

#define MD 998244353
ll@n++,@m;
ll p[n];
rep(i,n)p[i]=i;
rep(m){
	ll@t,@a,o=p[a];
	rep(t-1){
		ll@b;
		(o,p[b])=(p[b],o);
	}
	p[a]=o;
}
map<ll,ll>y;
rep(i,n){
	if(p[i]>=0&&p[i]!=i){
		ll j=i,a=0;
		while(p[j]>=0){
			(p[j],j)=(-1,p[j]);
			++a;
		}
		ll u[1d5],v[1d5];
		REP(k,Factor(a,u,v)){
			y[u[k]]>?=v[k];
		}
	}
}
Mint z=1;
for(auto w:y){
	z*=Mint(w.first)**w.second;
}
wt(z);