結果

問題 No.1512 作文
コンテスト
ユーザー yuruhiya
提出日時 2021-05-21 21:31:00
言語 Crystal
(1.19.1)
コンパイル:
crystal build -Donline_judge -o a.out --release --no-debug _filename_
実行:
./a.out
結果
WA  
実行時間 -
コード長 264 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 12,117 ms
コンパイル使用メモリ 342,208 KB
実行使用メモリ 30,720 KB
最終ジャッジ日時 2026-04-26 10:33:18
合計ジャッジ時間 14,297 ms
ジャッジサーバーID
（参考情報） 		judge3_0 / 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