作者qrtt1 (隐者)
看板perl
标题Re: [请益] 统计
时间Wed May 24 21:27:58 2006
※ 引述《windmusic (喔耶)》之铭言:
: ※ 引述《imce (蜥蜴)》之铭言:
: : while(1..6000)
: : {
: : $a=random();
: : $HASH{$a}++;
: : }
: : $HASH{1}
: : $HASH{2}
: : .
: : .
: : 就是结果次数
: 不好意思^^"
: 可以提供详细的程式码吗
: 我是初学者
: 还不熟练>"<
: 谢谢大大~
1. 他用到了
list 1~6000
2. 他用了
回圈,但是没有洋葱
3. 他用了
hash,有股哀伤感
4. 其他的code,把hash
印出来
5. 附注一下,
random要改一下分别表示6个号码
这些标色的东西,先找书学学
ps. perl的random函式是rand,你可以查一下他的用法
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.26.34.105
1F:推 imce:我错了,我不该用HASH,我不该写的那麽随性,重写一次 05/24 21:57
2F:推 qrtt1:orz..被看出来了>"< 冷笑话+提示.. 05/24 22:20