看板
[ NTUCE-94 ]
討論串產生亂數之副程式(劉老師計程班第七次作業)
共 2 篇文章
首頁
上一頁
1
下一頁
尾頁
內容預覽:
subroutine random(n,seed). implicit real (a-h,o-z). pi=3.1416. x=(seed+pi)**5. xint=int(x). xi=x-xint. seed=xi. n=int(seed*10). return. stop. end. 將以上
(還有455個字)
首頁
上一頁
1
下一頁
尾頁