codecamp

Fortran cycle 语句

cycle 语句与 exit 语句正好表示了相反的意思,它指示程序在不满足条件时继续执行后续语句,满足条件时跳过后续语句进入下一个循环。如示例 16 所示,这个 cycle 语句的效果与示例 14、15 的有些差别。

!!! 示例 16
sum = 0
do i = 1, 10
if (sum > 10) cycle
sum = sum + i
enddo
print *, i, sum ! 输出 i 的值为 11,sum 的值仍为 15


Fortran exit 语句
Fortran 多重循环下的 exit 与 goto 语句
温馨提示
下载编程狮App,免费阅读超1000+编程语言教程
取消
确定
目录

关闭

MIP.setData({ 'pageTheme' : getCookie('pageTheme') || {'day':true, 'night':false}, 'pageFontSize' : getCookie('pageFontSize') || 20 }); MIP.watch('pageTheme', function(newValue){ setCookie('pageTheme', JSON.stringify(newValue)) }); MIP.watch('pageFontSize', function(newValue){ setCookie('pageFontSize', newValue) }); function setCookie(name, value){ var days = 1; var exp = new Date(); exp.setTime(exp.getTime() + days*24*60*60*1000); document.cookie = name + '=' + value + ';expires=' + exp.toUTCString(); } function getCookie(name){ var reg = new RegExp('(^| )' + name + '=([^;]*)(;|$)'); return document.cookie.match(reg) ? JSON.parse(document.cookie.match(reg)[2]) : null; }