Re: [問題] [fortran] do...enddo迴圈中的檔案無法밠…

看板Programming作者時間18年前 (2007/04/14 20:32), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串1/1
==> irlmpo.bbs@ptt.cc (無心插柳柳橙汁) 提到: : program test : open(11,file="in.dat") ~~~~~~~~~~~~~~~~~~~~~~~~ : open(12,file="out.txt") ~~~~~~~~~~~~~~~~~~~~~~~~~ 首先,這兩行最好放在下面兩行的後面,一個program、subroutine 或是function的結構應該是先有宣告才有statement。 其次,請確認你在編譯後的可執行檔所在的目錄(資料夾)也有 in.dat檔案,並確定檔案內容是兩個浮點數。 : real a,b ~~~~~~~~~~ : real :: c(100) ~~~~~~~~~~~~~~~~ 麻煩把上面兩行開檔案的程式碼移到這裡。 : read(11,*)a,b : close(11) : do i=1,100 : c(i)=a+i**b : write(12,*)c(i) : enddo : close(12) : end : 結果out.txt中沒有寫入任何文字,這是什麼原因啊? : 找好久找不出原因,請明白的版友指點一下吧! : m(_ _)m 我這樣做就可以編譯且執行結果正常。 -- ◎(bbs.mgt.ncu.edu.tw) ◎[Tailss]From: 237-200.dorm.ncu.edu.tw

04/14 21:33, , 1F
程式可以跑了,感謝:)
04/14 21:33, 1F
文章代碼(AID): #168Cd600 (Programming)
文章代碼(AID): #168Cd600 (Programming)