您所在位置：主题：如何以时间作为种子产生随机数
tianhy2010
[专家分：60] 发布于 2010-08-24 13:03:00
关于随机数的产生以及应用，我在网上和本论坛搜索过了。我想以时间作为种子数，每个时间产生一个随机数，网上给出了这种方法：
program bh
implicit none
real :: x
call random_seed () ! 系统根据日期和时间随机地提供种子
call random_number (x) ! 每次的随机数就都不一样了
print*,x
end
确实可行。有人说随机数数据包是伪随机数，要自己编代码写rand程序，真的需要这样吗？
program bh
implicit none
real :: x
call random_seed () ! 系统根据日期和时间随机地提供种子
call random_number (x) ! 每次的随机数就都不一样了
print*,x
end
确实可行。有人说随机数数据包是伪随机数，要自己编代码写rand程序，真的需要这样吗？
