新手小白读写文件用法不太能理解，求大神解答

ssy · 发表于 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)是两个数组
还有这条语句希望大佬可以解答一下，没看懂
万分感谢

楚香饭 · 发表于 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

ssy · 发表于 2023-2-4 10:23:01

楚香饭发表于 2023-2-3 18:27
/ 就是输出一个回车。

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

十分感谢

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

新人勋章

爱心勋章

水王勋章

元老勋章

热心勋章