存成这种格式太不便
跳读吧,得数好,不通用
open (10, file='data.txt')
do i = 1, 11
if (i .lt. 6) then
read (10, *)
cycle
endif
read (10, '(a44, f)') s, a
write (*, '(f)') a
enddo
close (10)
end
FORTRAN求解Fortran怎样读取.txt文件里的文本行,我想得到的是wall1后面的298093567,O(∩_
存成这种格式太不便
跳读吧,得数好,不通用
open (10, file='data.txt')
do i = 1, 11
if (i .lt. 6) then
read (10, *)
cycle
endif
read (10, '(a44, f)') s, a
write (*, '(f)') a
enddo
close (10)
end