Re: [FORTRAN] 如果檔名是變數 要怎麼去讀它

看板Programming作者 (solebaby)時間18年前 (2007/10/30 12:26), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串6/6 (看更多)
不囉嗦~直接說 character*32 in open(8,file='input.inp') read(8,*) sk read(8,"(a20)") in 假設 in=t454001090.txt open(22,file=''//in) do i=1,n read(22) TIM(I) , Vertical(I) , Nouth(I) , EAST(I) end do 大概就是這樣 重點是~open(#,file=''/in) 在 ' ' 裡也可以加東西 但不能沒有 ' ' 這方式我在 intel compiler 都可以成功 其他種 compiler 就沒試過了 ※ 引述《kidd007008 (誰是接班人)》之銘言: : 想請問一下 : open(8,FILE='input.inp',status='old') : READ(8,*) SK : READ(8,*) DT : READ(8,*) N : READ(8,*) M : READ(8,"(A20)") in : CLOSE(8) : 我想從input.inp這個檔案裡面去讀我要執行的檔案 : 其中 in是檔名的變數 : 例如:in=T454001090.txt : 然後T454001090檔案裡面有4行一維陣列 : 要怎麼去讀這個檔案裡面的資料 : 例:一般在程式裡面都會用 : OPEN(12,FILE='T454001090.txt') : DO I=1,N : READ(12,*) TIM(I) , Vertical(I) , Nouth(I) , EAST(I) : END DO : 這種寫法去讀檔 : 那要怎麼從innput.inp去讀T454001090.txt這個檔案 : 然後讀T454001090.txt裡面4個一維陣列 : 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.109.112.232

10/31 09:15, , 1F
感謝
10/31 09:15, 1F
文章代碼(AID): #179h9-3S (Programming)
文章代碼(AID): #179h9-3S (Programming)