Re: [問題] 依照迴圈變數讀取陣列
※ 引述《JiGo (ㄐㄍ)》之銘言：
: 目前有一筆11x11的資料(二維陣列?)
: 每一個橫行的資料我都會分別做計算所以使用一維陣列去讀值
: 但是我要的資料只有矩陣的一半，對角線是右上到左下
: 如下：
: １ １ １ １ １ １ １ １ １ １ １
: １ １ １ １ １ １ １ １ １ １ ０
: １ １ １ １ １ １ １ １ １ ０ ０
: １ １ １ １ １ １ １ １ ０ ０ ０
: １ １ １ １ １ １ １ ０ ０ ０ ０
: １ １ １ １ １ １ ０ ０ ０ ０ ０
: １ １ １ １ １ ０ ０ ０ ０ ０ ０
: １ １ １ １ ０ ０ ０ ０ ０ ０ ０
: １ １ １ ０ ０ ０ ０ ０ ０ ０ ０
: １ １ ０ ０ ０ ０ ０ ０ ０ ０ ０
: １ ０ ０ ０ ０ ０ ０ ０ ０ ０ ０
１的部分是我要讀的值，並做一點計算
如果我沒搞錯問題，那麼方法該跟下面的方式差不多。
先聲明一點，因為太久沒用fortran，所以我無法保證語法的正確性。
do x=LYR,1,-1 (迴圈11次)
array(x)=0.0
read (,)array(x)
enddo
迴圈的變數可以由小變大，也可以由大變小。
所以你就讓他從11格讀到剩下1格就好啦，然後計算的東西就包在迴圈裡面即可。
我不確定是不是百分之百正確，因為太久沒用fortran，所以語法可能有誤。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.25.16.198
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
