結果

問題 No.412 花火大会
ユーザー yuruhiya
提出日時 2020-10-22 17:44:42
言語 Crystal
(1.14.0)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 518 bytes
コンパイル時間 11,720 ms
コンパイル使用メモリ 297,468 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-30 21:29:07
合計ジャッジ時間 12,471 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge3
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 18
権限があれば一括ダウンロードができます

ソースコード

diff # 

lib C
  fun strtoll(s : UInt8*, p : UInt8**, b : Int32) : Int64
end

class String
  def to_i64
    C.strtoll(self, nil, 10)
  end
end

x = read_line.split.map(&.to_i).sort
n = read_line.to_i
a = read_line.split.map(&.to_i)

dp = [0i64] * 8
dp[0] = 1i64

(0...n).each do |i|
  dp2 = dp.dup
  (0...8).each do |bit|
    if pos = (0...3).select { |j| bit.bit(j) == 0 && x[j] <= a[i] }.max_by? { |j| x[j] }
      dp2[bit | (1 << pos)] += dp[bit]
    else
      dp2[bit] += dp[bit]
    end
  end
  dp = dp2
end

puts dp[-1]
0