結果

問題 No.2433 Min Increasing Sequence
コンテスト
ユーザー tomerun
提出日時 2023-08-18 23:12:45
言語 Crystal
(1.19.1)
コンパイル:
crystal build -Donline_judge -o a.out --release --no-debug _filename_
実行:
./a.out
結果
AC  
実行時間 22 ms / 2,000 ms
コード長 340 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 15,477 ms
コンパイル使用メモリ 339,016 KB
実行使用メモリ 19,968 KB
最終ジャッジ日時 2026-05-22 11:26:47
合計ジャッジ時間 16,703 ms
ジャッジサーバーID
（参考情報） 		judge3_0 / judge1_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 32
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

MOD = 998244353i64
n = read_line.to_i
a = read_line.split.map(&.to_i)
cnt = Array.new(n + 1, 0i64)
sum = Array.new(n + 1, 0i64)
cnt[n] = 1
sum[n] = 1
min = a[-1]
min_pos = n - 1
(n - 1).downto(0) do |i|
  if a[i] <= min
    min = a[i]
    min_pos = i
  end
  cnt[i] = sum[min_pos + 1]
  sum[i] = (sum[i + 1] + cnt[i]) % MOD
end
puts cnt[0]
0