第7章结构化程序设计5.pptVIP

7.5 模块结构程序设计 应用程序一般由多个相关的功能模块(Module)组成 模块是指具有某种功能的一段相对独立的程序 采用模块结构程序设计的好处 整个程序结构清晰 易于分别编写与调试 便于维护与调用 并利于程序功能的进一步扩充与完善 一个模块调用另外一个模块的方法：DO 模块名 模块调用可以嵌套 被调用模块中的RETURN语句，返加到调用它的模块的下一条语句执行 ***计算圆柱体积的子模块e7_26_2.prg PARAMETERS r, h, v s=3.14159*r*r v=s*h RETURN 7.5.4 内存变量作用域 内存变量的作用域是指该变量在各程序模块内发挥作用的有效范围。按作用域的不同，可将内存变量划分为全局变量、私有变量和局部变量 7.5.5 过程与过程文件 1．过程的概念 过程是有如下结构的程序 PROCEDURE 过程名 [PARAMETERS 参数表] 语句序列 ENDPROC 2．过程文件 为了便于文件管理，一般把模块的功能用过程来实现，并且把多个过程文件放入到同一个文件，即过程文件。 过程文件的扩展文件名为.prg 过程文件是过程的集合 [EXAM] 求 见程序 main5.prg和过程文件myproc.prg Main5.prg note 四个累加 clear clea all set proce to myproc 打开过程文件myproc store 0 to x1,x2,x3,x4 *************** do s1 with 100,x1 累加100内的倒数 do s2 with 50,x2 累加50内的数 do s3 with 20,x3 累加20内的平方数 do s4 with 10,x4 累加10内的数n的n次方 w=x1+x2+x3+x4 ?四个累加结果是: w= ,w Myproc.prg proc s1 para n,s for i=1 to n S=S+1/i endfor return proc s2 para n,s for i=1 to n S=S+i endfor return 过程文件的使用，即如何调用过程文件中的过程 先执行下面命令打开过程文件 SET PROCEDURE TO 过程文件名 DO 过程名 使用完成后，要求关闭过程文件 CLOSE PROCEDURE 或 SET PROCEDURE TO 7.5.6 用户自定义函数 1．自定义函数的概念 自定义函数实际上是由用户自行编写的一个具有特定功能的程序段 与模块、过程一样是实现一定功能的程序块 定义形式与使用形式不同于模块、过程，函数一般有一个返回值传递给调用它的程序，模块、过程是通过变量把值传递给调用它的程序时 函数的定义方式 FUNCTION 函数名 [PARAMETERS 参数表] 语句序列 RETURN 表达式 ENDFUNC 调用过程与函数在同一个文件中，FUNCTION… ENDFUNC不可省 函数用独立的程序文件保存，则可以省略FUNCTION子句，此时函数即文件名 函数调用与系统函数的调用相同 *FUNCTION e730f PARAMETERS n s=1 FOR i=2 TO n s=s*i NEXT RETURN s *ENDFUNC ** 方法二：调用程序和函数在同一个文件中 CLEAR INPUT 请输入X的值： TO x INPUT 请输入Y的值： TO y INPUT 请输入Z的值： TO z w=jiech(x)+jiech(y)+jiech(y) ? +LTRIM(STR(x))+!++LTRIM(STR(y))+!+; +LTRIM(STR(z))+! = +LTRIM(STR(w)) RETURN FUNCTION jiech PARAMETERS n s=1 FOR i=2 TO n s=s*i NEXT RETURN s ENDFUNC 7.6 数组及其应用 数组是一批相同名称带不同下标的内存变量，数组中的每个元素用数组名及下标（表明在该数组中的排列顺序）表示 支持一维数组和二维数组 至多有3600个元素 各元素的数据类型可有不同 按行排列 7.6.1 数组的定义与使用 1．数组的定义 格式1：DIMENSION 数组名 (expN1 [,expN2]) [,数组名(expN1 [,expN2]),... 格式1：DECLARE 数组名(expN1[,expN2])[,数组名 (expN1[,expN2]),... 功能