TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
練習スレ
内視鏡検査について Part.3
なりすまし自演オオセキタダシとインリンコテ
落下傘が死ぬほど憎い既存開業医 集まれ4!!
患者さんに恋する医師
NTT東日本関東病院
女性患者にわいせつ容疑=40歳外科医 関根進逮捕
【●】看護師から嫌われれてる医師 笑【●】
【株・FX】投資・投機をしている医者【不動産】
☆★不正専門医・指定医を報告するスレ★★
9 :
import System.Environment

choose (n,r) = product[1..n] `div` product[1..n-r] `div` product[1..r]

nloc m n k l = do
let q = div (n*k+l) m
r = mod (n*k+l) m
in (n-q)*(m-k) + q-1-l + if r>k then k-r else 0

nwin m n c = sum[choose ((nloc m n k l), c-1) | k<-[0..m-1], l<-[0..n-1], k*(n-1) < l*(m-1)]
mwin m n c = sum[choose ((nloc n m k l), c-1) | k<-[0..n-1], l<-[0..m-1], k*(m-1) < l*(n-1)]
draw m n c = choose(m*n,c) - nwin m n c - mwin n m c

main = do
argList <- getArgs -- m : 縦マス(短軸) n : 横マス(長軸) k : 宝の数
let m = read (argList !! 0)
n = read (argList !! 1)
k = read (argList !! 2)
putStrLn $ "p1st = " ++ show(mwin m n k) ++ ", q1st = " ++ show(nwin m n k) ++ ", draw = " ++ show(draw m n k)

こういうのも瞬時に計算してくれた、10×20部屋に宝箱100個

>takara 10 20 100
p1st = 15057759425309840160151925452579572328997602171271937639470,
q1st = 15057796557877993527038542474310161591275806044157319150135,
draw = 60432921540347294111327092128863840691952977587098698541050

不定長整数が扱えるHaskellならではだな。
Rの
> mpfr(nwin(10,20,100),100)
1 'mpfr' number of precision 100 bits
[1] 15057796557878080240302485923118087468235549676781988478976は誤答とわかる

高嶋政伸と結婚した女医さん、彼を幸せにして!
「葵会」千葉・柏たなか病院をかたれ4
愛知県精神医療センター(旧・愛知県立城山病院)
精神科で薬付け→結局自殺
女医の犯罪くらべ 脇坂英理子 VS 吉田なつ
フリーでスポットしまくるお医者さんのための情報交換スレ1
発達障害診断が、医者、病院によってコロコロ変わる問題
なんだかんだ言ってワタク卒より国公立卒の医師の方が信用できるよね
愛知県精神医療センター(旧・愛知県立城山病院)
聖路加国際病院★2
--------------------
【バーチャル】hololiveアンチスレ#1499【Youtuber】
頭から陰毛みたいな癖毛が生えてるけどどうすれば良いのか 直毛だったらもっと明るい性格になってた [688621589]
【CCG】Shardbound【Pre-Alpha】Part1
【和月伸宏】るろうに剣心 北海道編19【ジャンプSQ】
【アイドルマスター】仲村宗悟アンチスレ★3【SideM】
土浦第一卒東大イン哲の変質者小高周一郎
【タイバニ】TIGER & BUNNY タイガー&バニーPart9【山佐】
【バイク】スペクターOBとその仲間たちの作品スレ【模型】
健常者とエセメンヘラはこの板から出て行け
麻雀界最高峰の大会でまたアマチュアが優勝…大会委員長が苦言「プロは反省すべき」 [404751488]
ネトウヨの米国デモ叩きのロジックが判明 w w「トランプが負けたら中国覇権確実で日本終わる」
【女優】裕木奈江、「性の対象に望まれがちな容姿を授かるとクズ大人の妄想の対象になり…いいもんじゃない」★4 美人の山口真帆添え
今日ののみもの。 Part.7
「中国はウイグル自治区に国連監視団受け入れよ」 英が要求
【参院選】消費税廃止を掲げる「れいわ新選組」が大躍進するかもしれない★17
グルガン族の男は静かに語った
ステレオサウンド読んだ? No.13
大阪人を必死に応援する山形県民
岩手県のスポーツを語ろう
スマートファルコン産駒応援スレ
TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼