FORTRAN95第01章-概述.pptVIP

* 二 给变量赋初值 给变量赋值不一定只利用赋值语句，可以在定义变量时给变量赋初值。例如 INTEGER：：a=1 REAL：：b=2.0 COMPLEX：：c=（1.0，2.0） CHARACTER（LEN=10）：：str=“FORTRAN 95” 注意，在定义变量时赋初值，赋值号右边不能是含有运算符的表达式，而且语句中的两个冒号不能省略。利用赋值语句给变量赋值是在程序执行时完成的，而在定义变量时赋初值是在程序被编译时实现的，可以提高程序的执行速度。 * 1.6简单的输入与输出 FORTRAN提供了丰富的输入输出功能。这些功能是通过输入输出语句实现的。 本节介绍简单的输入输出方法，即使用表控格式输入输出语句实现输入输出。所谓表控格式是指输入输出语句中不提供数据的输入输出格式，而按编译程序提供的隐含格式进行数据的输入输出。 * 1.6.1表控输入语句 表控输入语句的形式： READ（UNIT=u，*）输入表 或 READ *，输入表 其中，UNIT=u指定输入设备，u为输入设备号； “*”号表示表控输入，“UNIT”可以省略；“输入表” 可以是变量、数组元素名、数组名、子串名等,它 们之间用逗号分隔开。 语句的功能是从“u”指定的设备输入若干个数据，然后一一对应的赋给输入表中的元素。 * 例如 READ（UNIT=5，*）A，B，C 表示从5号设备输入三个数据,分别赋给变量 A 、B、C。该语句也可以写成 READ（5，*）A，B，C， 省略了“UNIT=”。这个语句还可以写成如下形式： READ（*，*）A，B，C 或者写成 READ*, A，B，C 形式。这些形式彼此是等价的，都表示以表控格式 从键盘输入三个数据分别赋给A、B、C。 * 在程序中使用表控格式输入数据时，当执行到 该语句，显示器上会出现一个光标，等待从键盘 输入数据。输入多个数据时,数据之间用逗号或空 格隔开，若输入字符常数,而且字符常数中有空格 符或逗号，则要使用撇号将字符串括起来。 * INTEGER A，B，C REAL X，Y，Z CHARACTER（LEN=20）C1，C2 READ*，A，B，C READ*（*，*）X，Y，Z READ（*，*）C1，C2 当执行到READ语句时，若从键盘输入以下数据： 1，2，3 ↙ 4.0，5.0，6.0 ↙ HAPPY BIRTHDAY ↙ 则执行结果是A=1，B=2，C=3，X=4.0，Y=5.0，Z=6.0，C1=“HAPPY”，C2=“BIRTHDAY”。 * 1.6.2表控输出语句 表控输出语句的形式： WRITE（UNIT=u，*）输出表 其中，UNIT=u指定输出设备，“UNIT”可以省略；u为输出设备号；“*”表示表控输出；“输出表”中可以包含变量、常数、数组名、数组元素名、子串名、函数名或一般表达式，各项之间用逗号隔开。该语句的功能是在“u”指定的设备上输出输出表中各项的值。 系统默认的输出设备号是6，表示在显示器上输出，可以 用“*”号表示默认设备。因此表控输出语句的以下几种写法是等价的。 WRITE（UNIT=6，*）A，B，C WRITE（UNIT=5，*）A，B，C WRITE（UNIT=*，*）A，B，C WRITE（*，*）A，B，C * 表控输出语句还有另一种形式： PRINT*，输出表 这个语句只能用于在标准输出设备上输出数据，它不能用 UNIT=u指定输出设备，这是和WRITE语句的主要区别。 另外注意，WRITE语句不能写成“WRITE*, 输出表”这 样的形式，即WRITE后面不能省略括号，同样PRINT后也 不能加括号。 下面是表控输出语句的例子。 INTEGER I，J REAL A，B WRITE（*，*）I，J PRINT*，A，B 如果设I=49，J=