作者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