fortran 中random_number

在Fortran中，可以使用INTRINSIC RANDOM_NUMBER函数来生成随机数。这个函数可以生成0到1之间的随机数。然后，可以通过简单的算术运算将其缩放为所需的范围。以下是一个生成1到100之间随机整数的示例代码：

program random_example
  implicit none
  integer :: random_value
  real :: random_real

  ! 生成0到1之间的随机实数
  call random_number(random_real)

  ! 将随机实数缩放到1到100之间的整数
  random_value = int(random_real * 100) + 1

  print *, "随机整数为：", random_value
end program random_example

请注意，需要在程序开头声明`implicit none`，这样可以确保所有变量都被显式声明。`random_number`函数需要一个实数参数，用于返回生成的随机数。 生成的随机数可以通过简单的算术运算进行缩放，然后将其转换为整数。在本例中，我们将它们缩放到1到100之间的整数。