結果

問題 No.2428 Returning Shuffle
ユーザー tomeruntomerun
提出日時 2023-08-18 21:22:04
言語 Crystal
(1.14.0)
結果
AC  
実行時間 237 ms / 2,000 ms
コード長 473 bytes
コンパイル時間 11,935 ms
コンパイル使用メモリ 296,580 KB
実行使用メモリ 67,200 KB
最終ジャッジ日時 2024-11-28 05:30:44
合計ジャッジ時間 14,582 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 23
権限があれば一括ダウンロードができます

ソースコード

diff # 

require "big"
n, m = read_line.split.map(&.to_i)
p = (0...n).to_a
m.times do
  s = read_line.split.map { |v| v.to_i - 1 }
  s.shift
  tmp = p[s[-1]]
  (s.size - 2).downto(0) do |i|
    p[s[i + 1]] = p[s[i]]
  end
  p[s[0]] = tmp
end
visited = Array.new(n, false)
ans = BigInt.new(1i64)
n.times do |i|
  next if visited[i]
  cur = i
  len = 0i64
  while !visited[cur]
    visited[cur] = true
    cur = p[cur]
    len += 1
  end
  ans = ans.lcm(len)
end
puts ans % 998244353
0