Fortran Coder

查看: 8923|回复: 4
打印 上一主题 下一主题

[求助] 逻辑错误真不知道怎么改了

[复制链接]

7

帖子

2

主题

0

精华

入门

F 币
38 元
贡献
22 点
跳转到指定楼层
楼主
发表于 2020-5-30 11:45:16 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

如图,以及后面那个end subroutine是应该改成end program吗
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

250

帖子

2

主题

0

精华

宗师

F 币
1730 元
贡献
872 点

规矩勋章

沙发
发表于 2020-5-30 13:31:41 | 只看该作者
用endif结束if块。
end subroutine 后面要加子程序名称结束,或者直接用 end 结束后面什么也不加。

7

帖子

2

主题

0

精华

入门

F 币
38 元
贡献
22 点
板凳
 楼主| 发表于 2020-5-30 13:44:03 | 只看该作者
necrohan 发表于 2020-5-30 13:31
用endif结束if块。
end subroutine 后面要加子程序名称结束,或者直接用 end 结束后面什么也不加。
...


主要是前面的子程序都是end subroutine
逻辑问题主要是这里的else if这报错,但是我打else也不行,就很僵硬

7

帖子

2

主题

0

精华

入门

F 币
38 元
贡献
22 点
地板
 楼主| 发表于 2020-5-30 15:19:03 来自移动端 | 只看该作者
有人吗。。。
回复

使用道具 举报

250

帖子

2

主题

0

精华

宗师

F 币
1730 元
贡献
872 点

规矩勋章

5#
发表于 2020-5-30 15:30:18 | 只看该作者
先排版一下,把if块的缩进对齐
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-4-25 11:53

Powered by Tencent X3.4

© 2013-2024 Tencent

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