Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1098229
  • 博文数量: 264
  • 博客积分: 7225
  • 博客等级: 少将
  • 技术积分: 5096
  • 用 户 组: 普通用户
  • 注册时间: 2008-11-17 08:53
文章分类

全部博文(264)

文章存档

2011年(33)

2010年(52)

2009年(152)

2008年(27)

我的朋友

分类:

2009-03-15 09:52:09

fortran中的随机数

关键词: 随机数  fortran

现在计算机产生的随机数都是伪随机数

random_number(x) 产生一个0到1之间的随机数(x可以是向量),但是每次总是那几个数。

用了random_seed ()后,系统根据日期和时间随机地提供种子,使得随机数更随机了。

program random

    implicit none

      call random_seed ()      ! 系统根据日期和时间随机地提供种子

    call random_number (x)   ! 每次的随机数就都不一样了

    write(*,*) x

    stop

end program random

阅读(1191) | 评论(0) | 转发(1) |
给主人留下些什么吧!~~