作者alan93702 (alan93702)
看板Fortran
標題[問題] 請FORTRAN高手幫幫忙?
時間Thu May 23 23:50:27 2013
想請教如果假設我現在有個矩陣K(10)內值是{0,11,0,15,0,0,30,0,100,0}，那我希望取15
減11,加100減30的值，而每次讀這K(10)內的值都不一定，簡單說就是想取中間都為0兩數
之間的差距總和,但算過的值不在重複算，矩陣內值必定有偶數個不為零的數，且兩兩一
對,這樣要怎麼寫呢?
還有另一個問題，我把我的矩陣寫成可調矩陣K(n),讓程式碼可以應用在不同比數的資料
上，但我有沒有辦法在讀檔時,讀到沒值時自己停,現在我得自己先輸入資料比數讓他讀，
但我希望我不用自己輸入資料比數，他迴圈讀檔時自己知道資料比數是多少自己停要怎麼
做呢?
新手發問，有什麼犯錯可以教導一下。謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.121.216.24
1F：推 george1224:1.我想到的方法是去除0的數值剩下的再兩兩相減後做加總 05/24 01:43
2F：→ alan93702:恩我試過把它非零寫到檔案，在計算在讀出來算。 05/24 09:20
3F：→ charlesdc:1.是邏輯跟數學自己解 2.加入.not.eof(file number)判斷 05/24 09:21
4F：→ alan93702:但每次比數不同，使我回圈讀取到矩陣不知要讀幾次 05/24 09:22
5F：→ alan93702:可以問一下.not.eof(file number)試什麼意思嗎? 05/24 09:33
6F：→ alan93702:或者書上哪裡找的，新手問題有點多抱歉，謝謝你。 05/24 09:34
8F：→ charlesdc:data進記憶體之後寫個function做一次抓兩個非0整數 05/24 14:25
9F：→ charlesdc:回傳相減值你在主程式做個迴圈call他加總就好了 05/24 14:26
10F：→ fcuiii:讀到沒值，在OPEN那裏用end=數字，就好了 05/24 17:26