hpa 发表于 2020-2-16 11:40:30

simply fortran的文件批处理

有数个txt文件,其中储存着气象台站的经纬度,如何用程序将符合经纬度条件的文件筛选出来

li913 发表于 2020-2-16 14:37:41

群共享,fortran批量处理文件。

hpa 发表于 2020-2-16 15:11:04

我也是刚开始学习Fortran,所以懂得不是太多,想问一下,如果需要对经纬度添加限制,应该怎么添加,这是代码:
program test
integer i
real s,a
character(512)::filename
call system('dir *.txt /b>1.dat')
s=0.0
open(10,file='1.dat')
do
    read(10,'(a)',iostat=i) filename
    if(i/=0) exit
    open(11,file=filename)
    read(11,*) a
    close(11)
    s = s + a
end do
close(10,status='delete')
end program

胡文刚 发表于 2020-2-16 17:53:42

循环读取,每次判断。
类似

do ....
read(11,*) a
if( a > ... ) then
    ...
end if
end do

mmaa 发表于 2020-12-1 21:14:26

li913 发表于 2020-2-16 14:37
群共享,fortran批量处理文件。

大佬,哪个群?qq吗?在哪里呀?

青衣巷 发表于 2020-12-2 20:39:36

本论坛官方QQ群:2338021
页: [1]
查看完整版本: simply fortran的文件批处理