結果

問題 No.75 回数の期待値の問題
ユーザー diginatu
提出日時 2014-11-24 00:46:24
言語 D
(dmd 2.109.1)
結果
WA  
実行時間 -
コード長 717 bytes
コンパイル時間 3,052 ms
コンパイル使用メモリ 147,968 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-12 01:37:08
合計ジャッジ時間 3,157 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 1 WA * 3
other WA * 16
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.stdio, std.conv, std.math, std.string, std.range, std.array,
       std.algorithm;

double solve(int mx) {
  if(mx <= 6) return 1.0/6;
  auto ans = new double[](mx);
  ans.length = mx+2;
  foreach(immutable int x; 1 .. mx+2) {
    if (x == 1) ans[x] = 1;
    else {
      double res = 0;
      foreach(immutable int i; 1 .. 7) {
        res += 1.0/6 * ((x-i>0)?ans[x-i]:0);
      }
      ans[x] = res + 1;
    }
  }
  return ans[mx+1] - ans[mx];
}

void main(){
  auto K = readln().strip().to!int();
  double a = solve(K);
  double ans = 0;
  double a_i=1;
  foreach(immutable int i; 1 .. 10000) {
    ans += i * a * a_i;
    a_i *= 1-a;
  }

  writefln("%1.10f", ans+6);
}
0