結果
問題 |
No.108 トリプルカードコンプ
|
ユーザー |
|
提出日時 | 2017-01-28 00:16:49 |
言語 | D (dmd 2.109.1) |
結果 |
AC
|
実行時間 | 27 ms / 5,000 ms |
コード長 | 756 bytes |
コンパイル時間 | 2,661 ms |
コンパイル使用メモリ | 152,364 KB |
実行使用メモリ | 25,128 KB |
最終ジャッジ日時 | 2024-06-12 06:41:14 |
合計ジャッジ時間 | 3,726 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 20 |
ソースコード
import std.algorithm, std.conv, std.range, std.stdio, std.string; import std.math; // math functions void main() { auto n = readln.chomp.to!size_t; auto ai = readln.split.to!(int[]); auto xi = new int[](3); foreach (a; ai) if (a < 3) ++xi[a]; auto dp = new real[][][](n+1, n+1, n+1); dp[0][0][0] = 0; real calc(int x0, int x1, int x2) { if (!dp[x0][x1][x2].isNaN) { return dp[x0][x1][x2]; } else { auto r = real(n); if (x0 > 0) r += calc(x0 - 1, x1 + 1, x2) * x0; if (x1 > 0) r += calc(x0, x1 - 1, x2 + 1) * x1; if (x2 > 0) r += calc(x0, x1, x2 - 1) * x2; return dp[x0][x1][x2] = r / (x0 + x1 + x2); } } writefln("%.7f", calc(xi[0], xi[1], xi[2])); }