求一个Fortran程序

题目

求一个Fortran程序
算法为：r是一个均匀分布于区间(-1,1)的一个随机数.这样,J可以写成J=J0(1+pr),求J0=1,p=0.2,0.4,0.6,0.8时的J值.求该算反的Fortran程序,

答案

现在计算机产生的随机数都是伪随机数.random_number(x) 产生一个0到1之间的随机数（x可以是向量）,但是每次总是那几个数.用了random_seed ()后,系统根据日期和时间随机地提供种子,使得随机数更随机了.program random...