結果

問題 No.3683 サーバー代がもったいない!
コンテスト
ユーザー tomerun
提出日時 2026-09-05 13:17:44
言語 Crystal
(1.21.0)
コンパイル:
crystal build -Donline_judge -o a.out --release --no-debug _filename_
実行:
./a.out
結果
AC  
実行時間 31 ms / 2,000 ms
+ 426µs
コード長 402 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 9,602 ms
コンパイル使用メモリ 327,800 KB
実行使用メモリ 11,008 KB
最終ジャッジ日時 2026-09-05 13:18:00
合計ジャッジ時間 11,626 ms
ジャッジサーバーID
（参考情報） 		judge4_0 / judge3_1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 27
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

INF = 1i64 << 60
n, k = read_line.split.map(&.to_i)
a = read_line.split.map(&.to_i64)
dp = Array.new(2) { Array.new(k + 1, -INF) }
dp[0][0] = 0
n.times do |i|
  (k - 1).downto(0) do |j|
    dp[1][j + 1] = {dp[1][j + 1], dp[0][j] + a[i]}.max if dp[0][j] != -INF
    dp[0][j] = {dp[0][j], dp[1][j]}.max if dp[1][j] != -INF
  end
end
ans = {dp[0][-1], dp[1][-1]}.max
puts ans == -INF ? "Impossible" : ans
0