[工学]VisualFortran90第3章.ppt

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

Visual Fortran 90 程序设计 3.1.2 种别说明 3.1.3 属性说明 §3.2 算术表达式和赋值语句 Fortran的数学表达式 赋值语句 §3.3 输入输出语句 简单的输出语句 4、算法的表示(流程图) 5、编写程序 6、静态调试(口头运行) 7、上机调试 8、文档说明 例:鸡兔同笼,总头数H,总脚数F,求鸡兔各多少只(x,y) 分析: x +y=H 2x+4y=F 输入输出的三种不同的格式: 1.表控格式的输入输出 2.有格式的输入输出 3.无格式的输入输出 要素: 1.在什么外部设备上输入或输出 2.用什么格式输入输出 3.输入输出哪些数据 §3.4 输入与输出编辑符 常用输入设备:键盘、卡片机、磁盘 常用输出设备:显示器、打印机、磁盘 如:READ(*,*)X WRITE(*,*)X 一般形式: READ (设备号,格式说明)输入表 READ 格式说明,输入表 WRITE (设备号,格式说明)输出表 PRINT 格式说明,输出表 格式说明:*、格式字符表达式 作用:精确地说明每一个数据应该怎样输入或输出,包括类型、小数点位置、有效位数、输出结果的形式 字符表达式或变量 WRITE(*,’( I5,3F5.4,A16 )’)IOLIST 或: CHARACTER(80)MYLIST MYLIST=‘( I5,3F5.4,A16 )’ WRITE(*,MYLIST)IOLIST 1.I 编辑符控制输出: 功能:用于整型数据的输入输出 格式: Iw Iw.m rIw w—输入输出数据字段宽度 m—在输出时,若m大于该整数位数,则在整数之前补0,使宽度为m r—为重复系数 一. 整型数的输入输出 例1.设? J=10, K=-12,L=123 WRITE (*,”(I3,I5,I7)”)J,K,L □10□□-12□□□□123 注意: 1.数字在指定的区域内右端对齐,不足w则左边补空格。 2.负数的符号也包含在字段宽度内 3.如果应输出的列数超过了规定的字段宽度,则不输出有效数据,以w个*填充。 4、BN, BZ :Blank interpretation Specifies interpretation of blanks in numeric fields (空格是否当0处理)仅用于输入格式语句,如 read “(BN,2I3)”,I,J 例2.在上例中,如果 J=-100,则结果为: ***□□-12□□□□123 例3.如果将格式串改为: “(I3,I5.4,I7.5)” 则输出: □10-0012□□00123 例4.如果L=123456 □10-0012□123456 !!Iw.m :m位数,则按照实际数输出 例5.?????? 如下表所示: 数据 格式 输出结果 -150 I5 □-150 1234 I6.5 □01234 4357 I7.3 □□□4357 -2468 I4 **** 注意:利用I编辑符输出时,应注意选择的w的值不能太小,以免出现字段宽度不够现象。一般选择w稍大一些。 例6.如将上例1中的格式串修改为 print “(2I3,I4)”,i,j,k 则输出结果会变为: □10-12□123 2.I 编辑符控制输入: [r]Iw w—控制数据所占的列数。 例7. READ(*,”(I4,I5)”)I,J 输入数据如下: □345□□415 输入数据后按回车键,则I=345,J=415 例8.程序如下: READ(*,`(I3,I3,I3)`)I,J,K !!注意格式串的使用 或 READ(*,`(3I3)`)I,J,K 输入123456789 如I=14,J=-25,K=234,按格式`(I2,I4,I4)` 输入则应为:14□-25□234 输入数据 格式 结果 说明 -867 I4 -867 负号记入w内 543□ I4 5430 空格当0 需要BZ格式符 □210 I4 210 左端空格无意义 23456 I4 2345 取前4位,多余无效 例9.如下表所示: 例10. PROGRAM MAIN WRITE(*,*)‘INPUT M=?’ READ(*,‘(I5)’)M WRITE(*,‘(A,I

文档评论(0)

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

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

1亿VIP精品文档

相关文档