結果

問題 No.1512 作文
コンテスト
ユーザー yuruhiya
提出日時 2021-05-21 21:31:00
言語 Crystal
(1.21.0 + ACL)
コンパイル:
crystal build -Donline_judge -o a.out --release --no-debug _filename_
実行:
./a.out
結果
WA  
実行時間 -
コード長 264 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 9,639 ms
コンパイル使用メモリ 329,540 KB
実行使用メモリ 30,848 KB
最終ジャッジ日時 2026-09-13 02:55:29
合計ジャッジ時間 11,108 ms
ジャッジサーバーID
（参考情報） 		judge2_1 / judge1_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 24 WA * 14
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

n = read_line.to_i
s = (1..n).map { read_line.chars }.select { |s|
  s.each_cons(2).all? { |(i, j)| i <= j }
}.sort_by(&.first)

dp = [0] * 26
s.each do |s|
  f = s.first - 'a'
  l = s.last - 'a'
  dp[l] = {dp[l], (dp[..f].max? || 0) + s.size}.max
end
puts dp.max
0