Fortran Coder

标题: 新手小白读写文件用法不太能理解，求大神解答 [打印本页]

作者: ssy 时间: 2023-2-3 17:10
标题: 新手小白读写文件用法不太能理解，求大神解答
本帖最后由 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
/ 就是输出一个回车。

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

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

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

十分感谢

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)