[問題] 請教一下篩選資料的問題(以解決)
感謝各位大大
問題已解決 以下提供方法
我的程式大約如下
dimension Z(5) 定義一個dimension
Z(1)=100 定義一個絕對比接下來你要的Z值還大的數字
Z(2)=0
Z(3)=0
Z(4)=0
Z(5)=0
do while (條件)
.
.
.
.
if (條件) then
if (z .LT. Z(1)) then
z=Z(1)
Z(2)=aa
Z(3)=bb
Z(4)=x
Z(5)=y
else
Z(1)=Z(1)
Z(2)=Z(2)
Z(3)=Z(3)
Z(4)=Z(4)
Z(5)=Z(5)
end if
end if
end do
write(127,*) Z(2),Z(3),Z(4),Z(5),Z(1)
結果:
100 10 1 7 8 6
先把第一筆資料存起來 之後出現下一筆資料時
發現9比10小就不紀錄 然後繼續這樣比
讓最後WRITE 只記錄 100 10 1 7 8 6 這筆資料
這方法感覺笨笨的 如果大大們有更好的寫法 再麻煩告訴我一下
有大大跟我說用temp 但無奈看完網路上的用法完全沒有概念
就用這種方法了
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.116.46.243
※ 文章網址: https://www.ptt.cc/bbs/Fortran/M.1423637884.A.1FA.html
→
02/11 16:31, , 1F
02/11 16:31, 1F
※ 編輯: zx168zx (140.116.46.243), 02/11/2015 17:45:30
→
02/11 17:46, , 2F
02/11 17:46, 2F
→
02/11 18:15, , 3F
02/11 18:15, 3F
※ 編輯: zx168zx (140.116.46.243), 02/11/2015 20:39:41
→
02/11 23:08, , 4F
02/11 23:08, 4F
→
02/12 12:52, , 5F
02/12 12:52, 5F
※ 編輯: zx168zx (140.116.46.243), 02/13/2015 14:27:31
→
02/13 15:57, , 6F
02/13 15:57, 6F
推
03/01 14:32, , 7F
03/01 14:32, 7F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章