Re: [問題] 如何大量讀檔

看板Fortran作者 (Laa)時間14年前 (2009/11/10 22:04), 編輯推噓1(1推 0噓 0→)
留言1則, 1人參與, 最新討論串3/4 (看更多)
※ 引述《sysrqli ()》之銘言： : 有爬過文 : 例如我讀檔案名稱XXXXX.txt.00000 : XXXXX.txt.00001 : XXXXX.txt.00002 : . : . : . : 要如何用do來寫 : DO I=1,800 : OPEN(UNIT=I, FILE="這裡要怎麼寫" : . : . : . : END DO : 小弟想請問各大大要如何寫 : 還是有其他方法 : 謝謝 另一種方法 用格式 I5.5 把數字寫進字串裡第11格到第15格 character*20 fin0,fin1 c 1234567890 15 data fin0 /'XXXXX.txt.?????'/ do i=1,800 fin1=fin0 write(fin1(11:15),'(I5.5)')i c print'(A20)', fin1 !可以試試print出來看是不是你要的檔名 open(11,file=fin1,.......) close(11) enddo -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.137.32.160 ※ 編輯: laa7352 來自: 140.137.32.160 (11/10 22:09)
推
11/10 22:51, , 1F
謝謝你^^
11/10 22:51, 1F
‣ 更多 laa7352 的文章
文章代碼(AID): #1A-NC37y (Fortran)
‣ 更多 laa7352 的文章
文章代碼(AID): #1A-NC37y (Fortran)