资源描述：
《Fortran语言基础教程(第6-8章)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、第六章Fortran的数据结构2016/1/716.1程序中的数据结构程序代数表达式:程序=算法+数据结构对于同一个问题的求解，即一个程序的实现，可以采用不同的数据结构和不同的算法。选择合适的数据结构可以降低算法的复杂度。2016/1/726.1程序中的数据结构在计算机高级语言中用数据类型来表示不同的数据结构。数据结构一般有以下三类：基本类型（Fortran支持）构造类型（Fortran支持）指针类型（Fortran90支持）2016/1/736.1程序中的数据结构Fortran支持如下几种基本类型：整型（第三
2、章）实型（第三章）双精度型复型字符型逻辑型（第四章）2016/1/746.1程序中的数据结构Fortran支持如下几种构造类型：数组（第九章）记录（第十三章）文件（第十三章）2016/1/756.2双精度数据类型由于实型数据提供的有效数字的位数有限（微型计算机一般提供7位），一方面满足不了精度的需要，另一方面还会产生误差。双精度类型以两倍于实型的字节（一般为8个字节）来存储数据，提供15~17位有效数字，解决了上述的问题。2016/1/766.2双精度数据类型Fortran中双精度常数要用指数表示：如：12.3
3、456789→1.2345656789D+1-0.123456789→-1.23456789D-1注意：不可写成1.2345656789E+1Fortran中双精度变量使用前要用类型说明语句或IMPLICIT语句加以说明：如：doubleprecisionA,B,Cimplicitdoubleprecision(a-c)2016/1/77程序举例例6.1：求如下分数序列前20项的和23581321,,,,,，12358132016/1/78程序如下：Doubleprecisiona,b,c,ss=0.0D0
4、a=1.0D0b=1.0D0c=a+bdo10,i=1,20s=s+c/ba=bb=cc=a+b10continueprint*,’s=’,send2016/1/796.3复型类型数据Fortran中复型常数要用一个括弧中的两个实数来表示，第一个实数表示复数中的实部，第二个实数表示复数中的虚部。如：1+2.5i→(1.0,2.5)-5.4i→(0.0,5.4)Fortran中复型变量使用前要用类型说明语句或IMPLICIT语句加以说明：如：complexA,B,Cimplicitcomplex(a-c)2016
5、/1/7106.3复型类型数据直接赋值如：c=(3.0,4.0)d=(8.76E+5,-6.8E-3)当实部和虚部不是常数，而是表达式时，则应该用CMPLX函数将实部和虚部组成复型数据再赋给复型变量如：C=cmplx(3.0*A,6.0+B)2016/1/7116.3复型类型数据如果CMPLX函数只有一个自变量，则它代表实部如：cmplx(3.0)→(3.0,0.0)在内存中一个复型数据占两个实数的存储单元，在PC中通常为8个字节2016/1/712程序举例例6.2：求一元二次方程ax2+bx+c=0的根Rea
6、la,b,c,d,part1,part2Complexx1,x2d=b**2-4.0*a*cpart1=-b/2.0*apart2=sqrt(abs(d))/2.0*aif(d.ge.0.0)thenx1=cmplx(part1+part2)x2=cmplx(part1-part2)elsex1=cmplx(part1,part2)x2=cmplx(part1,-part2)endifprint*,'x1=',x1print*,'x2=',x2end2016/1/7136.4四种数值型数据之间的转换和运算不同类
7、型数据之间的运算的规则（P134-135表6.1和表6.2）不同类型数据的赋值规则（P135表6.3）类型转换函数（P136表6.4）不同类型数据间的比较规则（P136表6.5）2016/1/7146.5字符型数据Fortran77不仅可以支持数值计算，而且也支持非数值处理，如文字处理。一、字符型常量：又称字符串，是用撇号括起来的若干个字符如：'CHINA''U.S.A'2016/1/7156.5字符型数据Fortran77规定在程序语句中可以使用的字符（字符集）如下：（1）英文字母26个（不分大小写）（2）数
8、字0-9，共10个字符（3）专用字符，共13个：(空格)'$()+-*/,=.:︺2016/1/7166.5字符型数据注意：1.空格也是有效字符2.系统字符集＞Fortran77字符集3.Fortran77字符型常量允许使用系统可以使用的字符集即系统字符集如：'Howareyou?''abc@sina.com.cn'都是合法字符串4.当字符串本身有撇号时，用两个撇号表示如：'That'
