作者imce (蜥蜴)
看板perl
標題Re: [請益] 統計
時間Wed May 24 18:29:45 2006
※ 引述《windmusic (喔耶)》之銘言：
: 我要設計一個程式
: 丟骰子6000次
: 最後要統計看各面出現的次數各是幾次
: 現在我已經把亂數設定好了
: 但是不會統計他的次數
: 有大大可以幫我解答嗎
: 感激不盡OTL
while(1..6000)
{
$a=random();
$HASH{$a}++;
}
$HASH{1}
$HASH{2}
.
.
就是結果次數
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.120.15.17