第11讲 函数和过程二.pptVIP

第十一讲 函数和过程二 例1、var x,y:integer; Procedure change; var x:integer; begin x:=2; y:=2; writeln(x,y); end; Begin x:=1; y:=1; writeln(x,y); change; writeln(x,y); End. 答案： 1 12 21 2 一、全局变量和局部变量 1、在子程序中定义的变量称为局部变量。 2、在程序的一开始定义的变量称为全局变量。 一般情况下： 全局变量作用域是整个程序； 局部变量作用域是定义该变量的子程序。 特殊情况下： 当全局变量与局部变量同名时： 在定义局部变量的子程序内，局部变量起作用；全局变量不起作用。 例 2、 var a,b:integer; procedure f(x,y:integer); var b,c:integer; begin a:=5; b:=7; c:=a+b; end; begin a:=2; b:=3; f(a,b); writeln(a, ,b); end. {5 3} 二、值参和变量参数 1、 var a,b:integer; procedure f(a,b:integer); begin a:=a+1; b:=b+3; writeln(a, ,b); end; begin a:=2; b:=3; f(a,b); writeln(a, ,b); end. ２、 var a,b:integer; procedure f(var x,y:integer); begin x:=x+1; y:=y+3; writeln(x, ,y); end; begin a:=2; b:=3; f(a,b); writeln(a, ,b); end. ◆　子程序中的参数是形式参数，简称形参． ◆　主程序中调用时的参数是实参． 形参分为：值形参、变量形参 １、值形参——传值：调用时临时开辟内存空间，调用结束，内存空间释放，所以不改变实在参数的值。２、变量形参（有var说明 ）——传地址：调用时不再开辟内存单元空间，变量参数直接指向响应的实参地址，所以改变了变量形参相当于改变了实参的值。 3、var a,b:integer; procedure f(var x:integer; y:integer); begin x:=x+1; y:=y+3; writeln(x, ,y); end; begin a:=2; b:=3; f(a,b); writeln(a, ,b); end. ４、 var a,b:integer; procedure change(a,b:integer); var t:integer; begin t:=a; a:=b; b:=t; writeln(a, ,b); end; begin a:=5; b:=8; change(a,b); writeln(a, ,b); end. 5、 var a,b:integer; procedure change(var a,b:integer); var t:integer; begin t:=a; a:=b; b:=t; writeln(a, ,b); end; begin a:=5; b:=8; change(a,b); writeln(a, ,b); end. 重点： 如果通过调用子程序来改变主程序中变量的值。 两种方法： 1）、使用变量参数。 2）、或者使用无参过程。 var a,b:integer; procedure change(x,y:integer); var t:integer; begin t:=x; x:=y; y:=t; end; begin a:=5;