加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

[转载]FORTRAN 中的goto/exit/cycle用法

(2014-03-10 10:51:42)
标签:

教育

分类: fortran
 
 
1,goto 
goto 在Fortran77中就流传下来了,它提供一个任意跳跃到所赋值行代码的位置,如果是在一个do 循环中如 
do 30 i=1,N 
   if(……)  goto 30 
30 continue  
上语句的意思就是如果符合if里的条件,则会进行下一次循环。 

2,pause 
pause的功能就能跟它的字面意思相同,程序执行到pause 时,会暂停执行,直到用户按下Enter键才会继续执行。 
  
3. continue 
continue这个命令没有实际的用途,它的功能就是 继续向下执行程序 
  
4,stop 
它可用来结束程序执行。 

5,cycle  
cycle命令可由略过循环的程序模块中,在cycle命令后面的所有程序代码,直接跳回循环的开头来进行下一次循环。 
 
do floor=1,dest 
  if(floor==4) cycle  
write(*,*) floor 
end do 
执行结果如下 
  
2 
3 
5 
6 
  
6 exit 
exit的功能是可以直接跳出一个正在进行的循环,不论是do 循环还是do while 循环。

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有