菜鸟问题7关于生成1到N的随机数

您所在位置：社区首页 — Fortran讨论区 — 菜鸟问题7关于生成1到N的随机数

主题：菜鸟问题7关于生成1到N的随机数

纯菜鸟。 [专家分：0] 发布于 2010-04-09 10:54:00

好像以前见到过，可是没留意，现在轮到用的，非常着急，
想问下各位大侠，怎么生成1到N的随机数。

沙发

asymptotic [专家分：16630] 发布于 2010-04-09 12:39:00

int(N * random_number()) + 1

板凳

ridgepolewang [专家分：60] 发布于 2010-04-09 23:31:00

call random_seed()
do i=1,n
call random_number(a(i))
enddo

您尚未登录，请登录后再回复。点此登录或注册