您所在位置：主题：fortran菜鸟。。。。。。。。。。
宠儿198712
[专家分：0] 发布于 2012-03-11 16:18:00
do year=1950,2011
call LeapYear(year,leap,maxday)
do i=1,17879
if(yymmdd(i,2).eq.year) then
do j=i,i+maxday
。。。。
。。。。
。。。。
end do
end if
end do
end do
我想跳过第二个do循环中与第三个 do循环重复的部分，该怎么办。。。。。
call LeapYear(year,leap,maxday)
do i=1,17879
if(yymmdd(i,2).eq.year) then
do j=i,i+maxday
。。。。
。。。。
。。。。
end do
end if
end do
end do
我想跳过第二个do循环中与第三个 do循环重复的部分，该怎么办。。。。。