※ 引述《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