找回密码
 注册
Simdroid-非首页
查看: 84|回复: 3

[3. Fortran] fortran错误代码5082【已解决】

[复制链接]
发表于 2014-3-25 11:40:14 | 显示全部楼层 |阅读模式 来自 大连理工大学
本帖最后由 hanshikai 于 2014-3-25 18:54 编辑
  1. PROGRAM AA
  2. IMPLICIT NONE
  3. INTEGER A,B

  4. READ(*,*)A,B
  5. IF (A*B/=0) THEN
  6. IF (A>0) THEN
  7. IF (B>0) THEN
  8. PRINT*,'第一象限'
  9. ELSE
  10. PRINT*,'第四象限'
  11. END IF
  12. ELSE IF(A<0) THEN
  13. IF (b>0) THEN
  14. PRINT*,'第二象限'
  15. ELSE
  16. PRINT *,'第三象限'
  17. END IF
  18. END IF
  19. ELSE IF ((A=0) .AND. (B/=0)) THEN
  20. PRINT*,'在Y轴上'
  21. ELSE IF ((A/=0 ).AND. B=0) THEN
  22. PRINT*,'在X轴上'
  23. ELSE
  24. PRINT*,'原点'
  25. END IF
  26. END
复制代码
编译出现错误代码5082,Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; + . - % (/ [ : ] /) . ' ** / ...



 楼主| 发表于 2014-3-25 11:42:57 | 显示全部楼层 来自 大连理工大学
Simdroid开发平台
版内搜索,未查找到5082的解决办法,检查代码没有发现错误【水平有限看不出来】

望前辈指点迷津。谢谢
回复 不支持

使用道具 举报

发表于 2014-3-25 17:58:16 | 显示全部楼层 来自 江苏南京
20行与22行基本语法错误,20行中 A=0是赋值语句,A==0是判断语句。22行是相同的错误,即B=0的问题。
回复 不支持

使用道具 举报

 楼主| 发表于 2014-3-25 18:34:28 | 显示全部楼层 来自 大连理工大学
longbao2 发表于 2014-3-25 17:58
20行与22行基本语法错误,20行中 A=0是赋值语句,A==0是判断语句。22行是相同的错误,即B=0的问题。 ...

一语惊醒梦中人啊,非常感谢。
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-3-29 15:06 , Processed in 0.034189 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表