Fortran程序设计[第七章-函数与子程序[上.pptVIP

第七章 函数与子程序(上);§7.1 概述;Fortran程序中的过程有两种： 函数子程序过程(简称函数子程序或函数) 子例子程序过程(简称子例子程序或子例行子程序)。 这两者的形式、功能与调用方法都有所不同，但总称为过程子程序，也简称为过程或子程序。 ;过程;内在函数分类 （1）三角函数 SIN() 、COS()、TAN()（以弧度为单位） SIND()、COSD()、TAND()（以度为单位） （2）常见的数据操作 类型转换函数：REAL()、DBLE()、CMPLX()、INT() 求绝对值：ABS() （3）地址函数 LOC()；%LOC()（在Fortran90中新增） （4）位运算函数（在Fortran90中新增） OR、AND、XOR、LSHIFT、RSHIFT ;系统函数调用 方法：写出相应的函数名字，并在后面的括号中给出所要计算的自变量值 如：SQRT（9.0）、ABS（X） 注意： （1）每个函数对所需自变量的个数和自变量类型有明确??规定和要求。 （2）系统函数的函数返回值也具有一定的类型。一般返回值与自变量类型一致。 （3）函数引用时，自变量必须写在括号里，自变量可以是常数、变量或表达式。 ;§7.2 函数子程序;1.函数开始语句的一般形式 FUNCTION 函数名（形参表）RESULT(结果名) 2.函数结束语句 是函数的结束标志，将控制返回到主调程序。 END [FUNCTION [函数名]] 3.函数过程体 是函数语句和函数结束语句之间的程序段，分为说明部分和执行部分。说明部分应对程序体内一切变量、数组等实体（包括变元）作出说明，同时还要说明函数结果变量名，但不可说明函数名。执行部分中必须对函数结果名至少赋值一次。 4.形参 可以是变量名、数组名、过程名、指针等。;函数调用;练习： 计算函数Sinh（x）的值，当ex的通项值小于等于1E-6时停止。计算公式如下：; ！主程序如下： Program main1 Real:: myExp,y,x Write(*,*) ‘Enter x:’ Read(*,*)x Y=(MyExp(x)-MyExp(-x))/2.0 Write(*,100) ‘Sinh(‘,x,’)=’,Y END PROGRAM ;QUESTION？？？