Fortran Coder

查看: 2066|回复: 2

[输入输出] 新手小白读写文件用法不太能理解,求大神解答

[复制链接]

13

帖子

6

主题

0

精华

入门

F 币
59 元
贡献
22 点
发表于 2023-2-3 17:10:01 | 显示全部楼层 |阅读模式
本帖最后由 ssy 于 2023-2-3 17:11 编辑

READ (*,'(14A6)')    TTL
WRITE(*,'(/(14A6))') TTL

read的意思是循坏14次每次读取6个字符
但是write里面的 / 不太懂啥意思

WRITE (*,'(500(/2(A8,D24.16)))') (CNAM(I),CVAL(I),I=1,N)//CNAM(I),CVAL(I)是两个数组
还有这条语句希望大佬可以解答一下,没看懂
万分感谢

716

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
624 元
贡献
319 点

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

发表于 2023-2-3 18:27:24 | 显示全部楼层
/ 就是输出一个回车。

WRITE (*,'(500(/2(A8,D24.16)))') (CNAM(I),CVAL(I),I=1,N)
500(/(A8,D24.16)) 就是把 /A8,D24.16 重复500次。
也就是输出500行,每行一个a8,一个D24.16

而 CNAM(I),CVAL(I),I=1,N  就是循环 N 次,每次输出一个 CNAM(i) 和 CVAL(i),i 从1到N

没猜错的话,N应该就是500。输出500行,每行一个 CNAM(i) 格式为 A8 ,一个 CVAL(i) 格式为 D24.16

13

帖子

6

主题

0

精华

入门

F 币
59 元
贡献
22 点
 楼主| 发表于 2023-2-4 10:23:01 | 显示全部楼层
楚香饭 发表于 2023-2-3 18:27
/ 就是输出一个回车。

WRITE (*,'(500(/2(A8,D24.16)))') (CNAM(I),CVAL(I),I=1,N)

十分感谢
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-6-24 05:49

Powered by Tencent X3.4

© 2013-2024 Tencent

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