結果

問題 No.260 世界のなんとか3
コンテスト
ユーザー ゴリポン先生
提出日時 2026-06-02 21:28:42
言語 D
(dmd 2.112.0)
コンパイル:
dmd -fPIE -m64 -w -wi -O -release -inline -I/opt/dmd/src/druntime/import/ -I/opt/dmd/src/phobos -L-L/opt/dmd/linux/lib64/ -fPIC _filename_
実行:
./Main
結果
AC  
実行時間 410 ms / 2,000 ms
コード長 1,317 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 3,700 ms
コンパイル使用メモリ 193,280 KB
実行使用メモリ 35,840 KB
最終ジャッジ日時 2026-06-02 21:28:58
合計ジャッジ時間 12,373 ms
ジャッジサーバーID
（参考情報） 		judge1_1 / judge2_1
純コード判定待ち
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 27
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

module main;
// https://kmjp.hatenablog.jp/entry/2015/08/03/0930 より
// 動的計画法
import std;

char[] A, B;
immutable MOD = 10L ^^ 9 + 7;
// 最上位からの桁数、0-9の任意の値を取れるか否か、3が現れているかどうか、
// 各桁の和を3で割った余り、各桁の和を8で割った余り
long[][][][][] dp;

long calc(char[] V)
{
	dp = new long[][][][][](10101, 2, 2, 3, 8);
	dp[0][0][0][0][0] = 1;
	auto v = V.map!(c => c - '0').array;
	foreach (d, c; v) {
		foreach (more; 0 .. 2) foreach (i3; 0 .. 2) foreach (m3; 0 .. 3) foreach (m8; 0 .. 8) foreach (x; 0 .. 10) {
			if (more == 0 && x > c) continue;
			(dp[d+1][more || (x<c)][i3 || (x==3)][(m3*10+x)%3][(m8*10+x)%8] += dp[d][more][i3][m3][m8]) %= MOD;
		}
	}
	long ret = 0;
	foreach (more; 0 .. 2) foreach (i3; 0 .. 2) foreach (m3; 0 .. 3) foreach (m8; 0 .. 8) {
		if ((m3 == 0 || i3 == 1) && m8) ret += dp[v.length][more][i3][m3][m8];
	}
	return ret % MOD;
}
// 文字列で表された数を1減らす
void dec(ref char[] A)
{
	A.reverse;
	foreach (ref r; A) {
		if (r != '0') {
			r--;
			break;
		}
		r = '9';
	}
	if (A.back == '0') A.length -= 1;
	A.reverse;
}

void main()
{
	// 入力
	readln.chomp.formattedRead("%s %s", A, B);
	// 答えの計算と出力
	dec(A);
	writeln((calc(B) - calc(A) + MOD) % MOD);
}
0