FORTRAN90第8章.pptVIP

FORTRAN程序设计 计算机中心 2006.3 Visual Fortran 90 程序设计 8.1 字符型数据基础 说明语句的写法 8.1.2 字符子串 8.1.3 字符表达式与字符赋值语句 字符型赋值语句 8.2 字符型数据的输入与输出 字符输入 字符输入 字符输出 8.3 字符型数组 8.4 用于字符处理的内在函数 用于字符处理的内在函数 程序设计 程序设计 程序设计 8.5.1 字符型数据作为函数过程变元 字符型数据作为函数过程变元 字符型数据作为函数过程变元 字符型数据作为函数过程变元 8.6 程序举例 程序举例 程序举例 程序举例 * * 8.1 字符型数据基础 8.5 字符型数据作为过程变元及函数值 8.2 字符型数据的输入输出 8.6 程序举例 8.3 字符型数组 8.4 用于字符处理的内在函数 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）用字符变量作为虚元时，虚元的长度取对应实元的长度 虚元可以和任意长度的实元相结合，有利于提高子程序的通用性。 子串变量：一个字符变量值中连续的一部分称为字符子串。 例：已知 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’ 字符表达式 用字符运算符把字符常数、字符变量、字符数组元素等字符型数据连接起来的有意义的式子。 字符运算符 1、字符连接符“//” 功能：将两个字符型数据按顺序首尾连接起来，成为一个新的字符型数据。 例：‘abc’//’def’ 得 ‘abcdef’ 注意:不满足交换律 2、关系运算： 例：‘abc’‘ada’ 比较规则： 1.两个字符比较时，以它们