結果

問題 No.302 サイコロで確率問題 (2)
コンテスト
ユーザー ゴリポン先生
提出日時 2026-11-07 15:04:57
言語 D
(dmd 2.113.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  
実行時間 424 ms / 6,000 ms
+ 723µs
コード長 852 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 2,623 ms
コンパイル使用メモリ 206,584 KB
実行使用メモリ 9,864 KB
最終ジャッジ日時 2026-11-07 15:05:07
合計ジャッジ時間 6,619 ms
ジャッジサーバーID
（参考情報） 		judge4_0 / judge3_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 28
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

module main;
// https://kmjp.hatenablog.jp/entry/2015/11/14/0930 より
// 確率、動的計画法、数値積分
import std;

void main()
{
	// 入力
	long N = readln.chomp.to!long;
	long L, R;
	readln.chomp.formattedRead("%d %d", L, R);
	// 答えの計算
	L = min(6 * N, max(N, L));
	R = min(6 * N, R);

	if (N <= 8000) {
		const di = 1 / 6.0;
		auto from = uninitializedArray!(double[])(6 * N + 10), to = from.dup;
		from[] = 0;
		from[0] = 1;
		foreach (i; 0 .. N) {
			to[] = 0;
			foreach (j; i .. 6 * i + 1)
				foreach (x; 1 .. 7)
					to[j + x] += from[j] * di;
			swap(from, to);
		}
		if (L > R)
			writeln(0.0);
		else
			writefln("%.12f", from[L .. R + 1].sum);
	} else {
		double ave = N * 3.5;
		double var = N * 35.0 / 12;
		writefln("%.12f", (erf((R + 0.5 - ave) / sqrt(2 * var)) - erf((L - 0.5 - ave) / sqrt(2 * var))) / 2);
	}
}
0