結果

問題 No.1017 Reiwa Sequence
ユーザー yuruhiya
提出日時 2021-04-02 21:05:28
言語 Crystal
(1.14.0)
結果
AC  
実行時間 1,165 ms / 2,000 ms
コード長 365 bytes
コンパイル時間 15,374 ms
コンパイル使用メモリ 295,312 KB
実行使用メモリ 75,264 KB
最終ジャッジ日時 2024-12-23 17:43:07
合計ジャッジ時間 64,877 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 50
権限があれば一括ダウンロードができます

ソースコード

diff # 

m = read_line.to_i
a = read_line.split.map(&.to_i)
n = {22, m}.min
hash = {} of Int32 => Int32
b1, b2 = nil, nil
(0...1 << n).each { |b|
  sum = (0...n).sum { |i| a[i] * b.bit(i) }
  if hash.has_key?(sum)
    b1, b2 = hash[sum], b
  end
  hash[sum] = b
}
if b1 && b2
  puts "Yes", (0...m).map { |i| a[i] * (b1.bit(i) <=> b2.bit(i)) }.join(' ')
else
  puts "No"
end
0