結果

問題 No.3427 Erasing a Subsequence
コンテスト
ユーザー tomerun
提出日時 2026-01-11 16:06:32
言語 Crystal
(1.18.2)
結果
AC  
実行時間 2 ms / 2,000 ms
コード長 644 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 14,384 ms
コンパイル使用メモリ 334,964 KB
実行使用メモリ 7,848 KB
最終ジャッジ日時 2026-01-11 16:06:48
合計ジャッジ時間 14,039 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 14
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

n, m = read_line.split.map(&.to_i)
s = read_line.split.map(&.to_i)
t = read_line.split.map(&.to_i)
limit = Array.new(n + 1, m)
pos = m
(n - 1).downto(0) do |i|
  if pos > 0 && s[i] == t[pos - 1]
    pos -= 1
  end
  limit[i] = pos
end

np = 0
mp = 0
ans = [] of Int32
(n - m).times do
  min = 9999
  min_np = n
  cur_mp = mp
  np.upto(n - 1) do |i|
    if s[i] < min && limit[i + 1] <= cur_mp
      min = s[i]
      min_np = i
    end
    if cur_mp < m
      if t[cur_mp] == s[i]
        cur_mp += 1
      else
        break
      end
    else
      break
    end
  end
  mp += min_np - np
  np = min_np + 1
  ans << min
end
puts ans.join(" ")
0