結果

問題 No.2388 At Least K-Characters
コンテスト
ユーザー Mizar
提出日時 2023-07-17 15:18:08
言語 Ruby
(4.0.6)
コンパイル:
ruby -w -c _filename_
実行:
ruby _filename_
結果
AC  
実行時間 2,900 ms / 4,000 ms
+ 970µs
コード長 857 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 9 ms
コンパイル使用メモリ 9,088 KB
実行使用メモリ 15,744 KB
最終ジャッジ日時 2026-08-07 08:20:58
合計ジャッジ時間 58,813 ms
ジャッジサーバーID
(参考情報)
judge1_0 / judge2_0
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 3
other AC * 34
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
raw source code

n, m, k = gets.split.map(&:to_i)
s = gets.chomp

MODULO = 998244353
KMAX = 26

kbits, kbc, result = 0, 0, 0
dp = Array.new(KMAX + 2, 0)
ndp = Array.new(KMAX + 2, 0)

s.bytes do |c|
	ci = c - "a".ord
	ndp.fill(0)
	same = (kbits & ((1 << ci) - 1)).to_s(2).count('1')
	ndp[kbc] += same
	ndp[kbc + 1] += ci - same
	if (kbits & (1 << ci)) == 0 then
		kbits |= (1 << ci)
		kbc += 1
	end
	if kbc >= k then
		result += 1
	end
	(1..KMAX).each do |j|
		ndp[j] += j * dp[j]
		ndp[j + 1] += (KMAX - j) * dp[j]
		ndp[j] %= MODULO
	end
	(k..KMAX).each do |j|
		result += ndp[j]
	end
	dp, ndp = ndp, dp
end

if kbc >= k then
	result -= 1
end

(n...m).each do |i|
	ndp.fill(0)
	(1..KMAX).each do |j|
		ndp[j] += j * dp[j]
		ndp[j + 1] += (KMAX - j) * dp[j]
		ndp[j] %= MODULO
	end
	(k..KMAX).each do |j|
		result += ndp[j]
	end
	dp, ndp = ndp, dp
end

puts result % MODULO
0