Fortran Coder

楼主: qs2017
打印 上一主题 下一主题

[流程控制] 大家帮我看条隐循环语句

[复制链接]

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
楼主
发表于 2017-11-16 12:14:39 | 显示全部楼层
本帖最后由 vvt 于 2017-11-16 12:20 编辑

你在主楼写的是
WRITE(NLB,REC=1) LREC,(-1,I=1,LREC-1)
上一楼你写的是
WRITE(NASC,REC=1) LREC,(-1,LREC=-1)
其中第二种写法是非法的。

第一种
WRITE(NLB,REC=1) LREC,(-1,I=1,LREC-1)
的意思是
先写入 LREC,然后写入  LREC-1 个 -1。

直观一点,假如 LREC = 6
那么相当于
WRITE(NLB,REC=1) LREC,-1,-1,-1,-1,-1

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
沙发
发表于 2017-11-16 12:21:07 | 显示全部楼层
第二个看你要做什么了。

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
板凳
发表于 2017-11-16 12:24:38 | 显示全部楼层
那把第一句复制一下,粘贴一下就可以了。

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
地板
发表于 2017-11-16 12:25:34 | 显示全部楼层
qs2017 发表于 2017-11-16 12:21
第一种写法我现在可以理解,第一种写法文件是个二进制文件,我想自己打开一个文本文件然后有同样的效果 ...

写入文本文件的话,这样写
WRITE(NLB,*) LREC,(-1,I=1,LREC-1)

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
5#
发表于 2017-11-16 12:35:24 | 显示全部楼层
是的。这样写。
程序断了有很多种可能。仅仅根据一句代码没法知道原因。

程序是需要前后对应的,所有语句单独都是正确的,组合起来还是可能有问题。

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
6#
发表于 2017-11-16 12:43:35 | 显示全部楼层
仅仅从你给出的代码来看,是的。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-5-5 21:09

Powered by Tencent X3.4

© 2013-2024 Tencent

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