Pascal讲授课件8——1.ppt

信息学竞赛辅导PASCAL语言基础 本节内容 1、子程序及其调用 （1）子程序： 在程序设计中，我们经常会发现一些程序段在程序的不同地方反复出现，通常可以将这些程序段作为相互独立的整体，用一个标识符给它起一个名字，凡是在程序中出现该程序段的地方，只要简单地写上其标识符即可。这样的程序段称为子程序。 本身不能单独执行，需要其他程序调用才能执行的程序。 1、子程序及其调用 1、子程序及其调用 2、函数的格式及应用举例 函数定义的一般格式为： function 函数名(形参表):函数类型; 局部变量说明部分; begin 语句1； 语句2 …… 语句n;. 函数名:=表达式； end; 2、函数的格式及应用举例 【例8-1】：编写一个求n!的函数fac。 【函数代码】： function fac(n:integer):longint; {函数首部} var i:integer; {局部变量说明部分} s:longint; begin s:=1; for i:=1 to n do s:=s*i; fac:=s; {将结果赋值给函数} end; 2、函数的格式及应用举例 【例8-2】 求3！+5！+7！的值 【算法分析】：设计一个计算阶乘的函数，在主程序中直接调用即可。 【程序代码】： program p8_2(input,outout); var s:longint; function fac(n:integer):longint; {定义求n!的函数fac} var i:integer; s:longint; begin s:=1; for i:=1 to n do s:=s*i; fac:=s; end; begin {主程序} s:=fac(3)+fac(5)+fac(7); writeln(s=,s); end. 3、过程的格式及应用举例 过程定义的一般格式： procedure 过程名(形式参数表); 局部变量说明 begin? 语句1； 语句2 …… 语句n;. end; 3、过程的格式及应用举例 【例8-3】 求3！+5！+7！的值 【算法分析】：设计一个计算阶乘的过程，在主程序中直接调用即可。 【程序代码】： program p8_2(input,outout); var s,i，sum:longint; procedure fac(n:integer); var i:integer; begin s:=1; for i:=1 to n do s:=s*i; end; begin {主程序} fac(3); sum:=sum+s; fac(5); sum:=sum+s; fac(7); sum:=sum+s; writeln(sum=,sum); end. 3、过程的格式及应用举例 【例8-3】 求3！+5！+7！的值 【程序代码】： program p8_2(input,outout); var s,i，sum:longint; procedure fac(n:integer); var i:integer; begin s:=1; for i:=1 to n do s:=s*i; end; begin {主程序} fac(3); sum:=sum+s; fac(5); sum:=sum+s; fac(7); sum:=sum+s; writeln(sum=,sum); end. 4、变量及其作用域 在Free Pascal语言中，所有的变量在使用前必须先定义，在一个复杂程序中，可能包含许多过程和函数定义，需要说明很多变量，各个变量有不同的作用范围，我们把它称为变量的作用域。 （1）局部变量及其作用域 在子程序内部说明的变量称为局部变量。形式参数也只是在该子程序中有效，因此也属于局部变量。一个变量的作用域是指在程序中能对此变量进行存取的程序范围。因此，局部变量的作用域就是其所在的子程序。实际上，局部变量只是当其所在的子程序被调用时才具有确定的存储单元，当控制从子程序返回到调用程序后，局部变量的存储单元就被释放，从而变得无定义。 （2）全程变量及其作用域 全程变量是指在主程序的说明部分中说明的量。 ①当全程量和局部量不同名时，其作用域是整个程序范围。 ②当全程量和局部量同名时，全程量的作