結果

問題 No.58 イカサマなサイコロ
ユーザー 6soukiti29
提出日時 2017-08-01 08:49:04
言語 Nim
(2.2.0)
結果
AC  
実行時間 2 ms / 5,000 ms
コード長 596 bytes
コンパイル時間 2,708 ms
コンパイル使用メモリ 65,404 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-30 01:56:41
合計ジャッジ時間 3,186 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 10
権限があれば一括ダウンロードができます
コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 17) Warning: imported and not used: 'sequtils' [UnusedImport]

ソースコード

diff # 

import strutils,sequtils

var
    N = stdin.readline.parseInt
    K = stdin.readline.parseInt
    Pt : array[11,array[70,float64]]
    Pz : array[11,array[70,float64]]
Pt[0][0] = 1
Pz[0][0] = 1
for n in 0..<N:
    for m in n..<60:
        if Pz[n][m] == 0:
            break
        for i in 1..6:
            Pz[n + 1][m + i] += Pz[n][m] / 6
Pt[0..(N - K)] = Pz[0..(N - K)]

for n in (N - K)..<N:
    for m in n..<60:
        for i in 4..6:
            Pt[n + 1][m + i] += Pt[n][m] / 3

var
    ans : float64

for n in N..(6 * N):
    for m in 0..<n:
        ans += Pz[N][m] * Pt[N][n]

echo ans
0