批踢踢實業坊
›
看板
Perl
關於我們
聯絡資訊
返回看板
作者
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