[工学]Fortran90 第2章.ppt

第二章 FORTRAN 90 基础知识 §2.1 Fortran语言的发展 2、主程序结构 [program 程序名称] IMPLICIT NONE [声明（说明）语句部分] [执行语句部分] END [program [程序名称]] 2.3.4 名字 对于名字有下列要求： 1.必须以字母开头，字母、数字和下划线 组成 2.在名字中不能出现空格 3.名字的长度不能超过31个字符 在每一基本类型中，依据不同的处理系统又细分为不同的种别，每一种别都与一个整数相对应，此整数称为类型种别参数，用来标识和区别所用的各种种别。 种别即决定数值在计算机中存储的字节数。 对于不同的构成方式，复数种别类型是不一样的： 实部和虚部都是实数 种别类型参数值是具有较大十进制精度那部分的种别类型参数值； 若精度相同，则由处理系统确定其中之一； 若一部分与复数不同的种别类型参数值，则转换到复数的那种类型，即由低精度向高精度转化； 实部和虚部均为有符号整数 复数的精度和范围就是缺省，且该常数被默认为复型的； 实部和虚部其中之一是整数 复数的种别就是另一部分的种别，且将该整数的种别转化到与另一部分相近的种别类型参数值 对于复数，也可以使用KIND、PRECISION、RANGE函数 注意： ‘’ 、“” 与 ‘ ’ 、“ ” 的区别！ 系统缺省的字符种别参数是kind(‘A’)的返回值 一个字符常数需要写成多行时：不仅每一续行都不能尾随注释。且每一续行必须以续行标识符开头，任何尾随号之后或前导之前的空格都不是字符常数的组成部分，号本身也不是常数的组成部分。 字符的排列顺序 按字符的ASCII值排列的 对于逻辑型数据，系统同样提供不同的种别类型参数。表示方法的种别类型参数值由函数KIND得到； 2.3.5 变量 变量的说明 例：INTEGER :: I,J,K REAL :: X,Y,Z REAL X,Y,Z character ::a,b ! 2个长度为1的字 符变量 注意： 整型数据运算速度快，在机内存储没有误差，但能表达的值的范围较小； 实型数据能表示小数、分数及不同的精度，表达的值的范围大，但数的外部表示和机器存储会有误差。 例：10.2，在机内表示可能为10.199998。 ！因此，在程序中尽量使用整数； 注意： ！使用实数时，尽量避免作相等或不相等的比较。 A是实型变量，对其与10.2作相等与否比较， IF（A==10.2） PRINT *,A 而，IF（ABS(A-10.2)1.0E-6）PRINT*,A 例题： 数据说明中的种别（kind）参数值在编译系 统内不能随意，以下说明中不能普遍适用的是： A. real(kind=8)::a,b,c B. complex(kind=8)::a,b,c C. integer(kind=2)::a,b,c D. integer(kind=8)::a,b,c 属性说明 例题： 以下关键字中，全部用于描述（数据）属 性的是： dimension、allocate、pointer intent、deallocate、target parameter、use、module allocatable、external、intent 例题： 如下四条说明语句，编译时出错的是： Implicit none Parameter(r=12.2) Real,parameter::pi=3.1415926 Real(4),parameter::s=pi*r*r A. ① B. ②和④ C. ③ D. ④ 2.3.6 派生数据类型 2.3.7 基本类型数组 2.3.8 字符子串 标量是一个非数组的数据。 标量可以是基本类型或派生类型。 一个单独的结构总是一个标量，但它内部可以含有数 组分量。 子对象是某些有名对象的一部分，可由其他部分引用 和独立说明。 子对象是他们自己的数据对象，只能由子对象标字符 所引用。 2.3.9 数据对象和子对象 §2.4 程序单元概念 2.4.1 主程序 PROGRAM MAIN !主程序开始 IMPLICIT NONE REAL,DIMENSION(10,10)::A,B ！说明部分 CALL FIND