結果

問題 No.3233 順列判定
ユーザー tomerun
提出日時 2025-08-15 21:28:07
言語 Crystal
(1.14.0)
結果
AC  
実行時間 24 ms / 1,000 ms
コード長 333 bytes
コンパイル時間 14,114 ms
コンパイル使用メモリ 312,632 KB
実行使用メモリ 8,140 KB
最終ジャッジ日時 2025-08-15 21:28:28
合計ジャッジ時間 15,718 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 40
権限があれば一括ダウンロードができます

ソースコード

diff # 

n, m = read_line.split.map(&.to_i)
if m == 1
  puts "Yes"
  exit
end
a = Array.new(n) { |i| pow(i.to_i64 + 1, m, n) }
puts a.uniq.size == n ? "Yes" : "No"

def pow(v : Int64, p, mod : Int64)
  ret = 1i64
  while p > 0
    if (p & 1i64) != 0
      ret *= v
      ret %= mod
    end
    v *= v
    v %= mod
    p >>= 1
  end
  ret
end
0