24小时热门版块排行榜    

查看: 478  |  回复: 2

zl2013

铜虫 (正式写手)

[求助] fortran语句求助

请看一段小程序,本人是小白 ,刚刚学习fortran ,请问这个程序是什么意思,求出的随机数组。怎么理解do 100 ii=1,1,和do 200 i=1,300000.这里的100.200啥意思咧?
        implicit double precision(a-h,o-z)
        open(1,file='ran2.dat',status='unknown')
       idum=-1
        do 100 ii=1,1
      do 200 i=1,300000
c        xx=ran1(idum)
c        yy=ran1(idum)
c      zz=ran1(idum)
        x1=ran1(idum)
        x2=ran1(idum)
c      write(2,*)xx,yy,zz
        write(ii,*)x1,x2
200        continue
100        continue
        close(1)
        end
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

凉白开
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sciencejoy

新虫 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
zl2013: 金币+5, 有帮助, 谢谢 我看书还没看到这呢 边学变看的 2013-08-28 09:03:55
行的标号,在你的代码里,指明do 对应的continue。你学Fortran不是看着书学的吗?
2楼2013-08-27 21:51:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dongdong_xmc

木虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
zl2013: 金币+5, ★★★很有帮助, 谢谢 2013-08-28 09:04:09
do loop的标识,就像给人取个名字一样。

现在的程序通常不用这种带标号的循环,而是用:
do i = 1, 100
.....
end do
3楼2013-08-28 00:50:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zl2013 的主题更新
信息提示
请填处理意见