文档介绍：第八章子程序
语句函数
函数子程序
子例行程序
程序单元之间的数据传递
递归调用
等价语句与数据块子程序
内部子程序
模块
一、语句函数
语句函数定义的一般格式是:
f(x1,x2,…,xn)=e
语句函数的调用形式和内在函数完全相同。
例1
计算f(1) f(10) f(12) f(-5)的值。
例2 找出100~999之间的所有水仙花数。
二、函数子程序
函数子程序的定义格式是:
[类型说明] FUNCTION 函数名(虚参表)
函数体
END
函数名的命名方法与变量名相同,虚参可以是简单变量和数组变量,但不能是常数、数组元素、表达式)
例1
求
分析:上述三个数列的通项不同,求和范围也不同,用一个程序段难以同时计算三个数列的和,并且,因为无法用一个语句函数完成数列的求和计算,所以也无法使用语句函数来简化程序设计。可以采用函数子程序来完成这个问题。设计一个求和的函数子程序SM(M,N,L),M、N分别为求和范围的上、下界,L反映数列通项的性质。
函数定义部分应注意如下问题:
(1)函数不能有同名虚参。虚参的类型可以在函数体中进行说明,当未对虚参类型进行说明时,虚参类型遵守I—N隐含规则。
(2)函数定义部分中一定要有一个语句将函数值赋值给函数名,这种赋值语句的格式是:函数名=表达式。注意不要在函数名后带上括弧。
调用一个函数子程序的方法和调用内在函数和语句函数的方法基本相同。
例2 用函数子程序的方法设计一个程序,求50~100内的所有素数及其和。
分析:设计一个函数子程序 PRIME(N):
主程序的任务是应用PRIME函数子程序在50~100之间使用枚举法求出那些使PRIME函数值为1的自然数并求这些数的和。
思考:子程序的返回值分别为逻辑型、字符型时,主、子程序程序做何修改?
例2 当一个数各个数位的立方和等于这个数本身时,称这样的数为水仙花数(如153=1**3+5**3+3**3,所以,153是一个水仙花数。)编程:求100~999之间的水仙花数。
分析:设计一个函数子程序NUM(N,I),当I=100时,函数NUM返回N的百位上的数;当I=10时,NUM返回N的十位上的数,I=1时,NUM返回N的个位上的数。主程序中调用NUM函数在100~999之间找出所有水仙花数。
三、子例行程序
子例行子程序定义格式是:
SUBROUTINE 子程序名(虚参表)
子例行程序体
END
子程序的命名方法与变量相同。虚参由变量、数组名(不能是数组元素,常数、表达式)充当,当虚参多于一个时,各虚参间用逗号分隔,当没有虚参时,子例行程序名后的一对括弧可以省略。
子例行程序的设计方法和函数子程序相同,但因为其名字没有值,所以不能有对子例行程序的名字赋值的语句。
子例行程序的调用格式是:
CALL 子例行程序名(实参表)
其实参的类型与函数子程序相同。和函数子程序的调用不同的是,子例行子程序的调用是一个独立的语句。
例1 用子例行程序的方法求上面的s1,s2,s3。
例2 设计一个子例行程序程序,求任意矩阵的转置矩阵。
实验九子程序(一)