Fortran第8章.pptVIP

* Fortran 90 Visual Fortran 90 程序设计 8.1 字符型数据 8.2 字符型数据的运算 8.3 字符字串 8.4 字符型数据的应用举例 8.1 字符型数据 8.1.1 字符型常量 说明(1)字符区分字母大小写 (2)空格为有效字符 (3)字符不受fortran90字符集的限制 (4)单撇号为有效字符时,如起止界为单撇号，则改写为两个单撇号；或起止界用双撇号 (5)长度=0 长度为0：由两个连续的撇号表示 或 写法： ‘一串字符’ 或 “一串字符” 长度为字符的个数（字节数）: 起止界不算 两个单撇号或双撇号算一个 空格为有效字符算一个 一个汉字占两个字节 长度计算 8.1.2字符型变量 (1)字符变量的含义：对应内存一片连续的存储空间 (2)字符变量应先说明其类型、长度、名字，再使用 说明语句的写法 比其它变量多长度说明 Character ([len=]长度)[,属性列表]:: 变量名[=初值] 例：Character(len=8)::Var,Au Character(8)::Var,Au 个别优于统一, (只能用*长度) Len=可省略 以下说明等价： Character(len=7)::A 或 Character(7)::A 或character*7::A 变量后指明其具体长度(个别说明）： CHARACTER （8）:: strg, strh, stri*12 不说明长度，长度默认为1 character::a,b,c 长度可为整型表达式，但要加括号 例： character(2)::a,b*(2+3) 有时可把长度值写成一个星号，但要加括号 Character（*）::CH，PARA Character（2）:: CH，PARA*（*） 使用范围: （1）具有PARAMETER属性的字符型符号常量 Character(*),parameter::para=‘FORTRAN_90’ 字符串长度取对应的字符常量的长度。 （2）用字符变量作为虚元时，虚元的长度取对应实元的长度 虚元可以和任意长度的实元相结合，有利于提高子程序的通用性。 字符型数组 如果具有Dimension属性，就成为字符数组变量。 例: character(3),dimension(4)::a，b*6 a的每个元素的长度均为3 b的每个元素的长度均为6 8.3 字符子串 子串变量：一个字符变量值中连续的一部分称为字符子串。 例：已知 A=‘123456’ 则 ‘123’，‘456’是A的子串 子串变量的写法 字符变量名（e1:e2） 其中:不可省略 e1和e2为整型表达式，表示起始和终止位置且1=e1=e2=长度L。 如e2 e1，则为空串。 例：子串变量写法 A（1:3） ‘123’ A（4:5） ‘45’ A（3: 3） ‘3’ A（:4） ‘1234’ A（4:） ‘456’ A（:） ‘123456’ 例8-9 阅读下面程序，写出程序运行结果 PROGRAM EXAM9 IMPLICIT NONE CHARACTER(LEN=5),DIMENSION(4)::A A=(/12345, ABCDE, 56789, EFGHK/) PRINT*,A(1:4:2)(2:3) END 2367 8.1-8.2 字符表达式与字符赋值语句 8.2字符表达式 用字符运算符把字符常数、字符变量、字符数组元素等字符型数据连接起来的有意义的式子。 8.2字符运算符 1、字符连接符“//” 功能：将两个字符型数据按顺序首尾连接起来，成为一个新的字符型数据。 例：‘abc’//’def’ 得 ‘abcdef’ 注意:不满足交换律 2、关系运算（比较运算）： 例：‘abc’‘ada’ 比较规则： 1.两个字符比较时，以它们的ASCII