pascal-函数和过程.docVIP

函数和过程―――子程序 1.一个较复杂的问题，可以细化分解为一些相对较小的子问题，可以将每一个子问题运用一段相对独立的小程序来解决； 2.一些具有相同或功能相似的程序段在程序中的不同位置反复出现，可以将这样的程序段做成一个整体，用一个标识符给它起一个名字，凡是需要这个程序段的地方只要简单地引用其标识符即可。 3.子程序包括过程和函数两种形式。 一、函数 1.标准函数 :由Pascal定义的函数。如我们熟悉的ord，chr等，程序员编程时直接引用就行了。 2.自定义函数：由程序员在程序中定义后再使用。　　如果一个子程序执行后能够返回其结果，那么它就可以用于表达式中，称这种子程序为函数，这种语句序列的定义称为函数说明。函数说明形式如下：　function　函数名(形式参数表):函数类型； ------函数首部　　说明部分；　begin　　语句1;　　语句2;　　……　　语句n　end3、函数的调用: 函数返回一个函数值，过程则能完成一系列各种操作。函数在语法上相当于一个表达式，所以，调用时，函数不能独立成为一个语句；它可以出现在任何表达式可以出现的地方。而过程调用是一句独立的语句。例如赋值语句的右边：X:=函数名(实在参数表); {X的类型与函数类型必须一致}又，如果函数类型是boolean，则还可以出现在条件语句中，充当条件表达式：if 函数名(实在参数表) then ……例：计算|X|的函数　　function abs(x:real):real;　　　var z:integer;　　begin　　　if x=0 then z:=x　　　else z:=-x　　　abs:=z;　　end;　　函数说明第一行为函数首部。它指明函数名、函数形参信息和函数值的数据类型。如上面求x绝对值的函数说明，函数名是abs；它有一个值参数X为实型；函数值的数据类型为实型。Turbo Pascal规定一个函数只能求出一个简单值，所以函数值类型只能是任何非结构类型。 例：编程实现Y SH（X）是双曲正弦函数，在TURB PASCAL的标准函数中没有该函数，必须由用户自己说明。由数学知识知：SH（X）=（ex-e-x）/2 Program ex5-10; Var x,y:real; Function sh(x1:real);real; Begin Sh:=((exp(x1)-exp(-x1)))/2; End; {====main====} Begin Write(‘please input X:’); Readln(x); Y:=sqr(x)+sh(x); Writeln(‘y=’,y); End. 　　除函数首部和过程首部的句法略有差别外，函数体和过程体完全相同。函数体中至少要有一条语句对函数名赋值。如函数abs 中有语句“abs：=z”。函数的每次求值至少要执行这样的一条语句，为此次计算求得一个值。返回时就把这个值带调用的地方。 二、过程 1.标准过程:由Pascal定义的过程。如我们熟悉的read，write等，程序员编程时直接引用就行了。 2.自定义过程：由程序员在程序中定义后再使用。给某个语句序列组成的子程序赋于一个适当的名字。程序中凡是需要出现这个语句序列的地方，可以简单的写上子程序的名字。这种完成一个操作的子程序称为过程；子程序的定义称为过程说明。过程说明由过程首部和过程体组成，其形式如下： procedure 过程名(形式参数表);-------过程首部说明部分;begin执行语句;……end; 例　输出两个数中最大值的过程procedure largest(a,b:integer);beginif ab then writeln(a)else writeln(b);end.　　上面largest过程由两个类型为整型的形式参数:a,b，你向过程传入的两个需要比较大小的数。 试思考：从键盘中输入52上数，请输出中最大的一个。 3、过程的调用：过程在语法上相当于一个语句，所以，调用时，直接写下就行：过程名(实在参数表); 三、形参和实参　　子程序调用(过程调用或函数调用)的执行顺序分为以下几步：　　　　实参和形参结合——〉执行子程序——〉返回调用处继续执行　　子程序说明的形式参数表对子程序体直接引用的变量进行说明，详细指明这些参数的类别、数据类型要求和参数的个数。子程序被调用时必须为它的每个形参提供一个实参，按参数的位置顺序一一对应，每个实参必须满足对应形参的要求 　　 Pascal子程序三类形参：1.值参数　　形式参数表中前面没有var，后有类型的参数。仅为过程和函数的执行提供初值而不影响调用时实际参数的值。在调用过程