[請益] 關於在UNIX作業系統下使用RAND的問題

看板PHP作者 (~銀日~)時間16年前 (2008/05/30 16:48), 編輯推噓-1(011)
留言2則, 2人參與, 最新討論串1/2 (看更多)
最近老師出了一份要使用 "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
PHP 沒這種問題...
05/30 18:28, 1F

05/30 19:38, , 2F
沒有 UNIX 版但是Linux版
05/30 19:38, 2F
文章代碼(AID): #18Fxznlk (PHP)
文章代碼(AID): #18Fxznlk (PHP)