作者gdi2000520 (肥滋滋)
看板Fortran
标题Re: [问题]请问如何用回圈开很多档
时间Sat Mar 27 00:54:16 2010
※ 引述《mcslambob (...)》之铭言：
: 请问要如何开很多个有相同档名但後面有不同编号
: ex:
: a1.dat
: a2.dat
: a3.dat
: .
: .
: .
: a60.dat
: 谢谢搂~感恩
PROGRAM MAIN
IMPLICIT none
CHARACTER*7 :: Fname
INTEGER :: LW3
Do LW3 = 1, 60
Write(Fname,10) "a",LW3,".dat"
10 Format(A1,I2.2,A4)
Open(LW3, File=Fname)
ENDDO
END PROGRAM MAIN
应该就行哩
--
Change your mind, also change your life
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 115.43.129.156