結果

問題 No.58 イカサマなサイコロ
ユーザー 6soukiti296soukiti29
提出日時 2017-08-01 08:45:59
言語 Nim
(2.0.2)
結果
WA  
実行時間 -
コード長 640 bytes
コンパイル時間 3,195 ms
コンパイル使用メモリ 65,152 KB
実行使用メモリ 5,376 KB
最終ジャッジ日時 2024-06-30 01:56:37
合計ジャッジ時間 3,761 ms
ジャッジサーバーID
(参考情報)
judge2 / judge4
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 2 ms
5,248 KB
testcase_01 AC 1 ms
5,376 KB
testcase_02 WA -
testcase_03 AC 1 ms
5,376 KB
testcase_04 WA -
testcase_05 WA -
testcase_06 WA -
testcase_07 AC 2 ms
5,376 KB
testcase_08 AC 1 ms
5,376 KB
testcase_09 WA -
権限があれば一括ダウンロードができます
コンパイルメッセージ
/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:
        if Pt[n][m] == 0:
            break
        for i in 4..6:
            Pt[n + 1][m + i] += Pz[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