admin管理员组

文章数量:1531657

2024年4月23日发(作者：)

Fortran输入输出格式控制

Open, Read and Write in Fortran

1：write(*,*)"string"；write(unit=*,FMT=*)"string"；write(unit=6,FMT=*)"string"。

以上等价，6是默认输出位置，即屏幕。

2：print*,"string"。Print只能对屏幕输出。

3：integer(kind=4) a !f90；integer*4 a !f77；integer(4) a !f77。以上等价。

real(kind=4) a !f90；real*4 a !f77；real(4) a !f77。以上等价。

4：f77，变量名长度1~6；f90，变量名长度1~31。

5：read(*,*)"string"；write(unit=*,FMT=*)"string"；write(unit=5,FMT=*)"string"。

以上等价，5是默认输入位置，即键盘。

6：FORMAT

（202.118.74.226/fortran/pages/）

6.1 格式输出

格式输出语句由两部分组成：输出语句和输出格式语句。输出语句的一般形

式为：

WRITE(*,L) 输出表列 或： PRINT L 输出表列

其中：* 代表隐含的输出设备，L 指输出格式语句的标号。

输出格式语句的一般形式：

L FORMAT(1X,S)

其中：L 输出格式语句的标号，1X 纵向走纸符，S 输出格式,用不同的―格式编

辑符‖（简称―编辑符‖）来实现指定的输出格式，各格式间用逗号相隔。

FORMAT语句又叫―格式语句‖，是一个非执行语句，本身不产生任何操作，

只是提供输入或输出的格式。FORMAT语句可以出现在程序的任何地方（但必

须在PROGRAM语句之后和END语句之前，如果在子程序中用FORMAT语句，

则应在子程序定义语句之后）。系统按WRITE语句或PRINT语句中指定的语句

标号找到相应的FORMAT语句，并按FORMAT语句所规定的格式对数据进行

输出。注意，PRINT语句中不能再用―*‖，PRINT语句中的第一个标识符是语句

标号而不是要打印输出的数据。

输出格式分两类 基本格式

6.1.1 I格式(又叫整数格式)

一般形式：Iw 或：Iw.m

其中：w 一个数据占的位数宽度（又称―字段宽度‖），m 需要输出的最少数字位

数。例1：

WRITE （*，100）M，N

100 FORMAT（1X，I4，I4）

如果M=40，N=-12，则输出如下：

??40 ?-12

例2：

WRITE (* , 100) I,J,K

100 FORMAT(1X,I5.3,I6.3,I4)

若 I=1234， J=-24， K=24689 则输出为:

?1234 ???-24 ****

（ 1）数字在指定的区域内向右端靠齐，如果数字位数比指定的字段宽度w小，

则左边补以空格。负数的符号也包含在字段宽度内。

（2）如果数字位数超过了规定的字段宽度w，则不输出有效数据，而在该字

段宽度范围内充满―*‖符号。

（3）如果数字位数超过了m,则按实际应输出的位数输出（但条件是不能超过

w)。m不包括负号所占的一列。

6.1.2 F格式(又叫小数型格式)

一般形式：Fw.d

w 各数值占的总位数 d 输出数据的小数位数（小数点后的位数）。 例1：

WRITE（*，100）A，B，C

本文标签： 语句输出格式位数宽度

版权声明：本文标题：Fortran输入输出格式控制 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/dianzi/1713830248a373491.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。