FORTRAN语言中，FORMAT(122(E12.6,1X)是什么意思？

Question

程序运行到这就报错，为什么？

Answer 1

format 语句用于描述 write 或 read 语句执行时的具体格式。语法规定，format 语句必须做出标号，通常是一个编号。

题主的代码编译提示是：Missing format label at ... 就是指 format 语句缺少标号。

指定一个标号就可以编译通过，例如：

101  FORMAT(122(E12.6,1X))

配套的 write 语句中，引用标号，建立关联。例如：

WRITE(*,101)  3.14159265358 , 4567.89 , 9993d101

它的输出如下图：

~~~~~~~~~~~~~~~~~~~~~~

FORMAT(122(E12.6,1X)) 的含义是：

以 E12.6 的格式输出一个科学计数法表达的实数，之后是一个空格；

122 则表示，(E12.6,1X) 中的格式最多可以重复 122 次。