[過去ログ] 〓 Mathematica 四 〓 (977レス)
上下前次1-新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
943 2010/07/06(火) 00:48:31
ポーカー
トランプのカードを
{H,1},{H,2}.....,{H,13}(ハート)
{S,1},{S,2}.....,{S,13}(スペード)
{D,1},{D,2}.....,{D,13}(ダイヤ)
{C,1},{C,2}.....,{C,13}(クラブ)
で表す。
(1)52枚のカードからランダムに5枚選び出す関数を書け。
(2)5枚の手札の(ポーカーにおける)点を下の表に従って与える関数を書け。
(3)(1)を1000回繰り返したときの平均点数を求めよ。
(表)
ワンペア 5点 ツーペア 10点 スリーカード 15点
ストレート 20点 フラッシュ 25点 フルハウス 30点
フォーカード 40点 ストレート・フラッシュ 50点
ロイヤル・ストレート・フラッシュ 100点
上下前次1-新書関写板覧索設栞歴
あと 34 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.048s