第六讲Fortran数据结构及输入输出.pptVIP

1. Fortran 数据结构 2. 数组 3. 数据有格式输入输出概述 4. 格式说明与格式编辑符 5. 整数有格式输入输出 6. 实数有格式输入输出 7. 复数有格式输入输出 8. 字符串有格式输入输出 9. 逻辑值有格式输入输出 10.二、八、十六进制数据有格式输入输出 11.任意类型数据有格式输入输出 12.不可重复编辑符 13.纵向走纸控制 14.有格式输入输出应用举例 15.作业 第六讲 Fortran数据结构及输入、输出 第六讲 Fortran数据结构及输入、输出 6.1 Fortran 数据结构 FORTRAN 90具有丰富的数据类型,有内部数据类型、派生数据类型、数组和指针类型等。利用丰富的数据类型可设计和编写出功能强大的FORTRAN 90程序。 类型 复数运算 字符型 6.1 Fortran 数据结构 第六讲 Fortran数据结构及输入、输出 6.1 复数型数据运算及内部函数 与实数的运算一样。 有＋，-，×，/，**。 并与实数一样有相应的内部函数。 FORTRAN 90提供了针对复数型数据的内部函数。 CMPLX(x[,y][,kind]) 将参数转换为复数型。结果:C(kind)。 DCMPLX(x[,y]) 将参数转换为复数型。结果:C(8)。 REAL(x) 求x的实部。 AIMAG(x) 求x的虚部。 IMAG(x) 同AIMAG(x)。 CONJG(x) 求x的共轭复数。 复数型数据 类型 复数型 字符型 第六讲 Fortran数据结构及输入、输出 6.1 字符型数据/子字符串 表示形式：字符变量名（开始位置：终止位置） 例子：有字符变量A，其取值为‘ABCDE12345FGH’，则下面的子串取值为： A(3:11) - ‘CDE12345F’， A(I+4:9) - ‘E1234’(I=1)，‘1234’(I=2) A(:5) - ‘ABCDE’ A(11:) - ‘FGH’ A(:) - ‘ABCDE12345FGH’ A(3:3) - ‘C’ 字符型数据 子字符串 运算符 内部函数 第六讲 Fortran数据结构及输入、输出 6.1 字符型数据/运算符 字符运算符：// 例子 关系表达式:对每种机器，系统都把本机上可以使用的各种字符按先后排列成某种次序，每个字符在排序中有确定的位置，称为排序号。有了排序号，字符之间就可以比较大小及相等与否，组成关系表达式。 字符作比较实际上是比较它们的序号大小。字符比较的一般形式是两端为字符表达式的关系表达式：＜字符表达式＞＜关系操作符＞＜字符表达式＞。 例如：‘A’‘B’的比较结果为真，C1//‘CCTV’=(‘XY’//C2)//C3 式当C1、C2、C3是字符型变量名时是合法的，要先计算两端字符表达式的值，而后比较它们是否满足≥关系。 program ex060202 character(len= 6) first character(len=10) second character(len=20) add first=Happy second=Birthday add = first//second ! 经由两个连续的除号 !可以连接两个字符串 write(*,*) add end 字符型数据 子字符串 运算符 内部函数 第六讲 Fortran数据结构及输入、输出 6.1 字符型数据/内部函数 函数名 说明 ACHAR(n) 将ASCII码n转换为对应字符。 ADJUSTL(string)* 将字符串string左对齐,即去掉左端空格 ADJUSTR(string)* 将字符串string右对齐,即去掉右端空格。string:CH(*),结果类型同string CHAR(n)* 将ASCII码n转换为对应字符。 IACHAR(c)* 将字符c转换为对应的ASCII码。 ICHAR(c)* 将字符c转换为对应的ASCII码。 INDEX(s,ss[,b])* 求子串ss在串s中起始位置。b为真从右起 LEN(s)* 求字符串s的长度。 LEN_TRIM(s)* 求字符串s去掉尾部空格后的字符数。 LGE(s1,s2)* 按ASCII码值判定字符串s1大于等于字符串s2。 LGT(s1,s2)* 按ASCII码值判定字符串s1大于字符串s2。 LLE(s1,s2)* 按ASCII码值判定字符串s1小于等于字符串s2。 LLT(s1,s2)* 按ASCII码值判定字符串s1小于