错误：（1）fortran中的不可分类语句

如何修复

if（）to go

中的

不可分类语句

错误？错误就在这里

 DO J=1,N
    IF ( I .EQ. J )GO TO 3
    Y=Y-A( I , J )*X( J )
 3 END DO

---

您希望do循环做什么？您只是想跳过

i==j

值或退出do循环。您可以在不标记

end do

语句的情况下实现这两个目标

跳过

i==j

案例：

DO J=1,N
  IF ( I .EQ. J ) cycle
  Y=Y-A( I , J )*X( J )
END DO

退出循环案例：

DO J=1,N
  IF ( I .EQ. J ) exit
  Y=Y-A( I , J )*X( J )
END DO

---

您希望do循环做什么？您只是想跳过

i==j

值或退出do循环。您可以在不标记

end do

语句的情况下实现这两个目标

跳过

i==j

案例：

DO J=1,N
  IF ( I .EQ. J ) cycle
  Y=Y-A( I , J )*X( J )
END DO

退出循环案例：

DO J=1,N
  IF ( I .EQ. J ) exit
  Y=Y-A( I , J )*X( J )
END DO

---

欢迎光临，请务必乘坐这辆车。所有Fortran问题都使用tag。请阅读并回顾我对您的问题所做的编辑。欢迎，请务必参加。所有Fortran问题都使用tag。请阅读并回顾我对您的问题所做的编辑。