Fortran Coder

查看: 1504|回复: 6

[求助] 大家帮我看看这个报错是怎么回事呢?

[复制链接]

28

帖子

9

主题

0

精华

熟手

F 币
114 元
贡献
68 点
发表于 2023-7-19 19:13:24 | 显示全部楼层 |阅读模式
这三个错误信息对应的都是图中指的这一句,我前面已经定义了这个SERG是数组了 K4TR9AZVDE4M6R7E2~[BM`I.png DLEG0P(QQ`AY`E~AUL)IKKE.png

718

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
632 元
贡献
323 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

发表于 2023-7-19 19:27:01 | 显示全部楼层
本帖最后由 楚香饭 于 2023-7-19 19:48 编辑

编译错误,从第一个开始看,先解决第一个,后面的一律不看。解决了第一个,然后重新编译,再解决新的第一个错误。(此时很可能后面的一些错误就消失了)
直到所有错误都解决为止。
(因为后面的很可能是第一个或前面的导致的,本来没错,因为前面出了错,导致编译器理解得不对)

28

帖子

9

主题

0

精华

熟手

F 币
114 元
贡献
68 点
 楼主| 发表于 2023-7-19 19:30:28 | 显示全部楼层
楚香饭 发表于 2023-7-19 19:27
编译错误,从第一个开始看,先解决第一个,后面的一律不看。解决了第一个,然后重新编译,再解决新的第一个 ...

第一个错误可能由什么导致的呢?我没找到错误原因

718

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
632 元
贡献
323 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

发表于 2023-7-19 19:49:00 | 显示全部楼层
你的截图中并没有给出第一个错误,也可能是截图太小了导致我不能确定是否是第一个错误。
以及其对应的错误行

此外,你给出的两层循环代码有点”傻“,不如改成这样,清晰明了,高效
SERG(:,:)=0
Do j = 1 , NNP
  SERG(j,j) = SEIG
End Do

28

帖子

9

主题

0

精华

熟手

F 币
114 元
贡献
68 点
 楼主| 发表于 2023-7-19 20:34:10 | 显示全部楼层
楚香饭 发表于 2023-7-19 19:49
你的截图中并没有给出第一个错误,也可能是截图太小了导致我不能确定是否是第一个错误。
以及其对应的错误 ...

我改成你这种写法就不报错了,很神奇,这俩表述不应该是一样的吗

718

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
632 元
贡献
323 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

发表于 2023-7-20 09:24:22 | 显示全部楼层
lili 发表于 2023-7-19 20:34
我改成你这种写法就不报错了,很神奇,这俩表述不应该是一样的吗

我不知道是什么原因,因为你给出的截图范围太小了,我无法确认“第一个错误”是什么,发生在哪里。

这两种写法虽然表述上是一样的,但是我的写法速度更快,逻辑更清晰。

28

帖子

9

主题

0

精华

熟手

F 币
114 元
贡献
68 点
 楼主| 发表于 2023-7-20 10:05:25 | 显示全部楼层
楚香饭 发表于 2023-7-20 09:24
我不知道是什么原因,因为你给出的截图范围太小了,我无法确认“第一个错误”是什么,发生在哪里。

这两 ...

好的好的,感谢
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-11-6 11:02

Powered by Tencent X3.4

© 2013-2024 Tencent

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