网站大量收购闲置独家精品文档,联系QQ:2885784924

第9章 格式化输入输出-授课版.ppt

  1. 1、本文档共25页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第9章 格式化输入输出-授课版

第九章 格式化输入/输出及文件操作 第九章 格式化输入/输出及文件操作 采用程序解决各类问题,需要有文件的输入和输出。格式化的文件输入输出操作可以有效的帮助我们理解问题。本章着重探讨格式化输入/输出格式编辑符、输入/输出语句及操作,包括: 1 PRINT 语句 2 格式编辑符 3 READ 语句 4 WRITE 语句 5 内部文件 6 外部文件 7 不换行的读写 一、READ语句 READ语句有两种基本形式: READ fmt[,list] READ ([UNIT=]u,[FMT]=fmt)[,list] * fmt指明了输入所用的格式,有以下3种形式: 格式说明符为“*”,表示按照表控格式; 格式说明符为字符串。例如输入语句: READ (*,(I2,2I3)) I,J,K 格式说明符是格式语句FORMAT的语句标号。 READ(*,10)I,J,K 10 FORMAT (I2,2I3) * u是设备描述符,用于指明具体使用的输入设备。u可以是一个无符号整型常量、整型变量或整型表达式。当设备描述符是“*”时,表示从默认的设备(一般是键盘)输入。 * list是变量列表,指定了输入的具体内容。变量列表不允许是常量或者表达式,但可以是隐含DO循环。语句中允许变量列表为空,此时READ语句将等待用户输入,指导用户键入回车键。 第一节 输入输出语句与格式语句 二、PRINT语句(向计算机的默认输出设备(即屏幕)上输出数据) PRINT语句的形式为: PRINT fmt[,list] * fmt指明了输入所用的格式,有以下3种形式: 格式说明符为“*”,表示按照表控格式; 格式说明符为字符串。例如: PRINT (I2,2I3),I,J,K 格式说明符是格式语句FORMAT的语句标号(1~99999)。 PRINT 10,I,J,K 10 FORMAT (I2,2I3) * list是变量列表,指定了输入的具体内容。变量列表不允许是常量或者表达式,但可以是隐含DO循环。语句中允许变量列表为空,此时PRINT语句的作用是输出一个空行。 第一节 输入输出语句与格式语句 三、WRITE语句 WRITE语句的基本形式为: WRITE ([UNIT=]u,[FMT]=fmt)[,list] * u是设备描述符,用于指明具体使用的输出设备。u可以是一个无符号整型常量,也可以是一个整型变量或者整型表达式。当设备描述符是“*”时,表示从计算机预先设定的外部设备(一般为显示器)输出。 * fmt指明了输出所用的格式,用法与PRINT语句相同。 * list是变量列表,指定了输出的具体内容。变量列表可以是变量、常量、函数以及表达式,还可以是隐含DO循环。 第一节 输入输出语句与格式语句 四、FORMAT语句 FORMAT语句即为格式语句,形式为: FORMAT(format-list) 其中:format-list表示格式说明列表。例: FORMAT(1X,F6.2,/,2(1X,I4):E14.7,’FORTRAN’) “F6.2” ,“I4” ,“E14.7”是数据格式编辑符; “1X” ,“/” ,“:”是控制格式编辑符; “2(1X,I4)”中的“2”是重复系数,用于编辑符的重置; 而由单引号引用的字符串“FORTRAN”将被直接输出。 四、FORMAT语句 要使用FORMAT语句必须为其设置标号,以便在输入输出语句中进行引用。 标号的大小与语句出现先后没有关系。可以出现在程序单元内部的任何位置。 例9-1 MODULE STUMOD TYPE STU CHARACTER(4):: NO REAL:: CHINESE,MATH,ENGLISH,TOTAL END TYPE END MODULE PROGRAM MAIN USE STUMOD IMPLICIT NONE TYPE(STU) S(5),TEMP INTEGER I,J DO I=1,5 WRITE(*,(请输入第,I1,位学生的学号以及语文、数学,英语成绩: ) , I READ(*,*)S(I)%NO,S(I)%CHINESE,S(I)%MATH,S(I)%ENGLISH S(I)%TOTAL=S(I)%CHINESE+S(I)%MATH+S(I)%ENGLISH END DO 例9-1续 ! 按照总分排序 DO I=

文档评论(0)

dajuhyy + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档