看板 Fortran 關於我們 聯絡資訊
※ 引述《Gwaewluin (神無月 孝臣)》之銘言: : 我有兩個檔案 : 一個長的像這樣一行內有三個資料 : 1 0.0 0.0 : 2 0.1 0.1 : 3 0.2 0.2 : 一個長得像這樣一行內有四個資料 : 1 0.0 0.0 0.0 : 2 0.1 0.1 0.1 : 3 0.2 0.2 0.2 : 請問有什麼辦法可以讓我判斷出在讀的檔案一行內有幾個資料呢? ====================================================================== 我不太清楚有沒有現有的指令可以用 不過我有想到一個"不是通解"的方法 雖然很笨...不過也可以參考一下啦 首先先定義個夠大的一維陣列 然後初始化值給一個資料內不可能出現的數值 再讀近一行資料 之後用迴圈+判斷式去找你的初始值 這樣計數器的值就是你要的東東了...... 簡易的code大概是: ========================= implicit none real*4 M(100),V integer*4 a open(50,"OOOOOOO") M=XXX; a=0; v=0 read(50,*)M do while(V=XXX) a=a+1 V=M(a) end do end ======================== 那a就是你要的東西 隨手寫的沒跑過編譯器所以可能有誤 不過大致上的概念是這樣...... 記得做完要rewind 不然再繼續做的話資料會少一行 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 125.230.84.247