Re: [問題] fortran程式的問題..
※ 引述《flywww (髒髒)》之銘言:
: DO 52 J=1,M1
: RMN(J)=1.0
: 52 R(J)=1.0
這迴圈是獨立的
所以整個 RMN與 R 這兩個矩陣都是1.0
: GOTO 56
: .
: .
: 56 CONTINUE
: DO 57 J=1,M1
: SX(J)=1.
: SXMN(J)=1.
: IF(MODE.LT.3)GOTO 57
: SX(J)=R(J)
: IF(J.NE.1)SXMN(J)=RMN(J)
: 57 CONTINUE
這邊一樣
把迴圈獨立來看
SX 與 SXMN 這兩個矩陣的1-7號位置都要令他為1
但是如果 MODE 小於 3的話 直接跳開回圈來到57繼續往下執行
: DO 62 J=2,M2
: YCVR(J)=R(J)*YCV(J)
: ARX(J)=YCVR(J)
: IF(MODE.LT.3)GOTO 62
: 請問各位大大程式跑的流程 DO 52那行之後
: 下面的RMN(J)=1.0也是要代入1~7嗎(M1=7)
: 還是沒有?
有 因為那是迴圈內
: 然後在DO 57那行後 57那行是CONTINUE 就直接從CONTINUE那行在繼續跑下去
: 還是 SX(J)=1.
: SXMN(J)=1. 這兩個也要跑也要代1~7
有 因為那也是迴圈
但是你有IF 當條件成立之後 會跳出迴圈到57
說實在的 如果不熟迴圈 不如乖乖的用 do enddo 來血比較不會搞混
--
●▲◆▼●▲◆▼●▲◆▼●▲◆▼●▲◆▼●▲◆▼● ▲▲▲▲
▼ 我與我的酷企鵝 - 台客 ▲ 〒 〒
◆ 相本: http://photo.xuite.net/animalion ◆ ▲
▲ 網誌: http://blog.xuite.net/animalion ▼ ◣ ▼ ◢
●▼◆▲●▼◆▲●▼◆▲●▼◆▲●▼◆▲●▼◆▲● M A R U.
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 192.83.177.177
推
02/13 17:31, , 1F
02/13 17:31, 1F
討論串 (同標題文章)
完整討論串 (本文為第 2 之 2 篇):
Programming 近期熱門文章
PTT數位生活區 即時熱門文章