主题:如何产生随机数?
lala2
[专家分:70] 发布于 2005-11-17 21:05:00
大家指教!
回复列表 (共6个回复)
沙发
zhaoren [专家分:420] 发布于 2005-11-17 21:11:00
begin
rondowize;
i:=rondow(x);
end.
不记得太多,反正就是产生0~(x-1)之间的数。~~
板凳
小虾虾 [专家分:300] 发布于 2005-11-18 10:33:00
同意一楼
3 楼
lala2 [专家分:70] 发布于 2005-11-18 20:46:00
Thank you very much
4 楼
lala2 [专家分:70] 发布于 2005-11-18 20:51:00
咦!不能用!要编译开关吗?
5 楼
阿Ben [专家分:2200] 发布于 2005-11-19 16:51:00
哈哈!一楼的单词拼写错误啦!
修改后的程序:
begin
randomize;
i:=random(x);
end.
楼主试试吧!
6 楼
我是新手tc [专家分:0] 发布于 2005-11-19 22:03:00
5楼的同志好象说得对哦
我来回复