結果

問題 No.1072 A Nice XOR Pair
ユーザー yuruhiya
提出日時 2020-06-05 21:47:19
言語 Crystal
(1.14.0)
結果
WA  
実行時間 -
コード長 283 bytes
コンパイル時間 11,626 ms
コンパイル使用メモリ 296,072 KB
実行使用メモリ 15,840 KB
最終ジャッジ日時 2024-06-30 20:13:51
合計ジャッジ時間 12,588 ms
ジャッジサーバーID
(参考情報)
judge1 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 4 WA * 7
権限があれば一括ダウンロードができます

ソースコード

diff #

n, x = read_line.split.map &.to_i
a = n.times.map { read_line.to_i }
cnt = Hash(Int32, Int64).new(0)
a.each do |i|
  cnt[i] += 1
end

ans = 0_i64
cnt.each do |val, c|
  val2 = val ^ x
  if val != val2
    ans = c * cnt.fetch(val2, 0)
  else
    ans = c*(c - 1)//2
  end
end
puts ans
0