Fortran格式输入输出.ppt

6.1输入输出概述,第六章格式输入输出,一般应在输入输出语句中提供三方面的信息：(1)通过什么设备来进行输入输出。(2)采用什么样的格式来进行输入输出。(3)输入输出的具体内容。,输入：从外部设备将数据传送到计算机内存,输出：将计算机内部的数据传送到外部设备,6.2格式输入输出语句,一、格式输出,(3)格式语句(FORMAT)的语句标号。例如：PRINT100,A,B,C100FORMAT(1X,F9.4,2F7.3),1PRINT语句,格式：PRINTf,输出项,f：格式说明符，有三种形式：,(1)*，使用表控格式。,(2)(格式编辑符)，例：PRINT(1X,2F7.3),X,Y,输出项可以是变量、常量、函数以及表达式。此外，输出项还可以是隐含DO循环。,2.WRITE语句,格式：WRITE(u,f)输出项,U：设备号，用于指明使用的输入输出设备。可以是一个整型量，也可以是星号*，*指系统隐含指定的外部设备，一般为显示器。,f：格式说明符，用法与PRINT语句相同。,二、格式输入,格式：READf,输入项READ(u,f)输入项,U：设备号f：格式说明符,输入项可以是变量，也可以是隐含DO循环。,6.3格式说明语句,格式说明语句可以放在程序单位语句(主程序语句PROGRAM，子程序语句FUNCTION或SUBROUTINE)之后，END语句之前的任何位置。,格式：语句标号FORMAT(格式编辑符),例如：10FORMAT(1X,I4,F5.1),格式说明语句是非执行语句，它只是给输入输出语句提供数据的格式描述。,6.4常用的编辑符,一、可重复编辑描述符,可重复编辑描述符与输入输出项相对应。不同类型的输入输出项使用不同的编辑描述符。,1.整型数据编辑描述符（I,B,O,Z）,I编辑符用于十进制整数的输入输出。,r：重复系数，为1时可以省略。w：字段宽度。,格式：rIw,输入：在输入记录中从左往右取w个字符存入对应的输入项。取得的w个字符必须是整数，正负号也占一个字符位置，空格也占一个字符位置，但不起作用。,例如：READ(*,10)I,J,K10FORMAT(I4,I5,I6)输入714-346-12345则I,J,K的值分别为：714、-346和-123。,输出：数字在指定的w字段宽度中向右端靠齐，左补空格。当w位数不足时，将输出w个“*”。,例如：WRITE(*,10)K,L10FORMAT(1X,I5,I4)当K=12，L=-7567时，输出结果为：12*,(2)B,O,Z编辑符。这是FORTRAN90新增的编辑符。分别采用二进制、八进制和十六进制形式描述整型量的输入输出。其基本用法与I编辑符相同。,2.实型数据编辑描述符（F,E,EN,ES,G）,(1)F编辑符,用于实型量的小数形式输入输出。,格式：rFw.d,r：重复系数w：字段宽度d：输入输出的小数位数,输入：按w指定的字段宽度从输入记录中截取数据，若截取的数据中不带小数点，则系统按d自动加上小数点；若数据自带小数点，此时d不起作用，自带小数点优先。,例如：READ(*,10)A,B输入123456726.8910FORMAT(F7.2,F6.1)则A、B的值分别为1234.56和726.89,输出：w实际位数时，左补空格w实际位数时，输出w个“*”实际位数：整数位数+小数位数+小数点+负号实际小数位d，保留d位，对d1位四舍五入,例如：WRITE(*,10)A,B,C10FORMAT(1X,3F8.3)当A、B、C的值分别是78.9、-0.00072、12345.678时，输出为：78.900-.001*,(2)E编辑符,用于输入输出指数形式的实数。,格式：rEw.dd：数字部分小数位数,输出采取规格化的指数形式，即小数点在第一位为非零数字的前面。,例如：WRITE(*,10)A,B10FORMAT(1X,E12.4,E13.2)当A、B的值为128.433和-0.0008时，输出为：.1284E+03-.80E-03,根据输出数据的大小自动采用F或E格式,(3)G编辑符,3.复型数据编辑符,对复型数据按实部和虚部分别输入输出。例如COMPLEXCMREAD(*,10)CMWRITE(*,20)CM10FORMAT(2F5.2)20FORMAT(1X,2F7.2)输入1234567890，则输出为：123.45678.90,格式：rGw.d,在输入时，输入的数据可以是.TRUE.或.FALSE.，也可以是头一个字母为T或F的任何字符串(T或F前面可以接“.”或空格，后面可以是任意字符),4.逻辑型数据编辑符L,格式：rLw,在输出时，逻辑值为真输出T，逻辑值为假输出F，且在左边补w-1个空格。例如WRITE(*,10).FALSE.,A.LT.B.OR.1.GT.210FORMAT(1X,L3,L4)输出为：FT,5.字符型数据编辑符A,用于字符型数据的输入输出,格式：rAw,首先从输入记录中读取w个字符，再根据输入项的长度L，决定输入变量的内容：当w=L时，w个字符全部送给输入项。当wL时，取右边L个字符送给对应的输入项。当wL时，字符靠右对齐，左补w-L个空格当wL时，输出左边w个字符,例如：CHARACTER*5C1,C2,C3READ(*,10)C1,C2,C310FORMAT(A5,A2,A7)输入abcdefghijklmn，则C1、C2、C3的值分别为：abcde、fg、jklmn,例如：WRITE(*,10)China,China，China10FORMAT(1X,A7,A,A3)输出为：ChinaChinaChi,二、非重复编辑描述符,非重复编辑描述符直接向当前输出记录传递信息，因此不需要输入输出项与其对应。,1.X编辑符,用于在输入输出的常数之间插入n个空格,格式：nX,n：正数，从当前位置向右跳过n个字符位置。,例：I=146;A=124.32;B=1247.32WRITE(*,10)I,A,B10FORMAT(1X,I3,2X,F6.2,2X,E11.5)输出：146124.32.12473E+04,例如：READ(*,10)K,J,A10FORMAT(2I3,3X),E5.2)输入：876-42193671E4则：K=876,J=-42,A=67100.0其中非重复编辑符3X，跳过193这三个字符。,格式：nHn：正整数,2.H编辑符用于输出字符串,例：format(1X,2HL=,I3,2HJ=,I4),3.撇号编辑符用于输出字符串,例：I=123;J=2347WRITE(*,10)I,J10FORMAT(1X,I=,I3,2X,J=,I4)输出：I=123J=2347,将输出记录中的第一个字符作为纵向走纸控制符，这个字符不输出，而从输出记录的第二个字符开始输出。,4.纵向走纸控制符,常用的控制字符：空格(走纸一行，换行)、0(走纸二行，空一行)、1(换页）、(不走纸，回到本行重迭打印),例如：WRITE(*,10)I,J10FORMAT(1X,I=,I3,2X,J=,I4)应输出：I=123J=2347实际输出：I=123J=2347,如果：10FORMAT(I=,I3,2X,J=,I4)输出：=123J=2347,5.斜扛编辑符,结束当前正在输入或输出的记录，开始下一个记录的输入输出。,例如：I=246;A=12.36;J=35;B=173.5WRITE(*,10)I,A,J,B10FORMAT(1X,I3,F6.1/1X,I3,F6.1)输出：24612.435173.5,2.如果可重复编辑符的个数多于输入输出项的个数，则多余的编辑符不起