[請益] 關於在UNIX作業系統下使用RAND的問題
最近老師出了一份要使用 "RAND()"來產生亂數的問題
但是我的亂數跑出來都是 "0."
請問高手這要如何解決呢?
以下是算式的全文
program TEST
real a, b, c, i, N
parameter (N=10000)
real*8 f(N), rand(N)
do i=1,5
f(i)=rand(1)
write(*,*) i, f(i)
end do
stop
end
PS 因為找不到UNIX版所以 在這邊發問
如果不適合我會自D 謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.132.138
※ 編輯: silversun 來自: 140.116.132.138 (05/30 16:59)
噓
05/30 18:28, , 1F
05/30 18:28, 1F
→
05/30 19:38, , 2F
05/30 19:38, 2F
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 1 之 2 篇):