fortran第8章fortran第8章.ppt

* Fortran 90 Visual Fortran 90 程序设计 8.1 字符型数据基础 8.5 字符型数据作为过程变元及函数值 8.2 字符型数据的输入输出 8.6 程序举例 8.3 字符型数组 8.4 用于字符处理的内在函数 8.1 字符型数据基础 8.1.1 字符型常量与变量 说明(1)字符区分字母大小写 (2)空格为有效字符 (3)字符不受fortran90字符集的限制 (4)单撇号为有效字符时,改写为两个单撇号或双撇号 (5)种别参数用前缀法表示 (6)长度=0 长度为0：由两个连续的撇号表示 ‘’或“” 字符常量的写法： ‘一串字符’ 或 “一串字符” 长度为字符的个数: 起止界不算 两个单撇号或双撇号算一个 空格为有效字符算一个 长度计算 字符型变量 (1)字符变量的含义：对应内存一片连续的存储空间 (2)字符变量应先说明其类型、长度、名字，再使用 说明语句的写法 比其它变量多长度说明 Character ([len=]n1[,[kind=]n2] )[,属性列表]:: 变量名[=初值] 例：CHARACTER (LEN=20,kind=2):: last_name Character(kind=3,len=8)::Var,Au Character(8,3)::Var,Au 个别优于统一 长度在前,种别在后 只有长度说明而无种别参数说明时，采用以下说明： 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）用字符变量作为虚元时，虚元的长度取对应实元的长度 虚元可以和任意长度的实元相结合，有利于提高子程序的通用性。 8.1.2 字符子串 子串变量：一个字符变量值中连续的一部分称为字符子串。 例：已知 A=‘123456’ 则 ‘123’，‘456’是A的子串 子串变量的写法 字符变量名（e1:e2） e1和e2为整型表达式，表示起始和终止位置。1=e1=e2=长度L 例：子串变量写法 A（1:3） ‘123’ A（4:5） ‘45’ A（3: 3） ‘3’ A（:4） ‘1234’ A（4:） ‘456’ A（:） ‘123456’ 8.1.3 字符表达式与字符赋值语句 字符表达式 用字符运算符把字符常数、字符变量、字符数组元素等字符型数据连接起来的有意义的式子。 字符运算符 1、字符连接符“//” 功能：将两个字符型数据按顺序首尾连接起来，成为一个新的字符型数据。 例：‘abc’//’def’ 得 ‘abcdef’ 注意:不满足交换律 2、关系运算： 例：‘abc’‘ada’ 比较规则： 1.两个字符比较时，以它们的ASCII码值决定大小。 2.字符串比较：从左到右逐个字符进行比较 若所有字符完全相同，则表达式相等，否则，以第一次出现不等字符的比较结果为准。 3.若两个字符串中字符个数不等时，则将较短的字符串后补足空格后再比较。 ASCII顺序：空格 0 ~ 9 , A ~ Z , a ~ z