※ 引述《windmusic (喔耶)》之銘言:
: 我要設計一個程式
: 丟骰子6000次
: 最後要統計看各面出現的次數各是幾次
: 現在我已經把亂數設定好了
: 但是不會統計他的次數
: 有大大可以幫我解答嗎
: 感激不盡OTL
我以為你有點基礎了@@,因為你說你已經把亂數設定好了
我寫的簡單程式如下,不用HASH改用陣列比較好講
foreach(1..6000) #從1跑到6000,你要for($i=0;$i<6000;i++)也行
{
$a=int(rand(6))+1; #$a就是亂數1~6,因為骰子沒有0所以+1
$ARRAY[$a]++; #陣列ARRAY的$a格次數+1,陣列應該懂了吧
}
#下面就是印結果了,跑過大概都在950-1050之間
print "1的次數為:$ARRAY[1]\n";
print "2的次數為:$ARRAY[2]\n";
print "3的次數為:$ARRAY[3]\n";
print "4的次數為:$ARRAY[4]\n";
print "5的次數為:$ARRAY[5]\n";
print "6的次數為:$ARRAY[6]\n";
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.120.15.17
※ 編輯: imce 來自: 140.120.15.17 (05/24 22:02)
討論串 (同標題文章)