运行成功，但是没有结果文件出现

黄小仙儿

EOFme 发表于 2014-7-5 20:08
还有一种可能是没有条件满足你设定的if语句，所以没有输出

刚刚试了一个时间段一个时间段地输入，就出来了。还是笨办法吧~

黄小仙儿

LOSER 发表于 2014-7-5 20:26
你的i是（1，11644），70650+(i*1200)在（71850，？），i=1时，70650+(i*1200)=71850恰好是19点57分30秒，i ...

恩，我发现了。但是不知道这个该怎么弄，只有笨办法，一个一个地输时间段了

LOSER

if( (hour(i)*3600+mini(i)*60+sec(i)) >=71850.and.(hour(i)*3600+mini(i)*60+sec(i))<=72150 )then
        write(12,100)m,lat(i),lon(i)
endif       
       

LOSER

或者if ( hour(i)=19 )then
        if( mini(i)*60+sec(i)>=3450 )then
                write(12,100)m,lat(i),lon(i)
        endif
elseif ( hour(i)=20 )then
        if ( mini(i)*60+sec(i)<=150 )then
                write(12,100)m,lat(i),lon(i)
        endif
enddo

893116547

我这是看到作者本人了么？

虫儿飞

应该是你的判断语句没写好