高中信息技术竞赛班第二阶段培训第七课过程与函数教案.docVIP

§7过程、函数

Pascal语言实现结构化程序设计的主要手段之一是使用子程序——过程及函数,利用过程和函数,把程序中需要多次重复使用,且具有特定功能的程序段,单独编写成一个称为子程序的程序段,它存贮一次,但可以在程序的多个地方被调用,处理不同的数据.

§7.1过程（子程序）

过程说明的一般形式：

procedure过程名(参数表);

(说明部分);

begin

语句;

……

语句;

end;

其中procedure是保留字,它说明这一段程序是过程,一个过程对应一个procedure.过程名是自定的标识符,程序通过过程名调用这段程序.参数表是用于向过程传递数据的变量的说明.说明部分则是过程内部所使用的变量的说明.

请分析下面程序的具体执行过程.

programex1;

varu,v:integer;

procedurep1(x,y:integer);{过程说明}

vari,j:integer;

begin

fori:=1toxdo

begin

j:=y+i;

write(j);

end;

end;

Begin{主程序}

u:=6;v:=5;

p1(u,v);{过程调用}

writeln;

u:=u+v;v:=u*v;

p1(u,v);{过程调用}

write(‘end’);

End.

分析如下：程序从主程序的执行部分开始

①u←6v←5

(过程调用)

――――――→参数传递：x←u=6y←v=5

②p1(u,v)执行过程体,输出：67891011

――――――→返回主程序调用处

(调用结束)

③writeln;

④u←6+5＝11v←11*5=55

(过程调用)

――――――→参数传递：x←u=11y←v=55

⑤p1(u,v)执行过程体,输出：5657585960616263646566

――――――→返回主程序调用处

(调用结束)

⑥输出：end

以上例子仅说明过程在程序中如何说明和调用,有关参数的传递问题在下面细述：

无参过程

过程中最简单的是无参过程,这种过程的首部只有过程名,而没有参数表部分.

【例1】利用过程画一条横线.

Programdraws;

procedureline;{无参过程}

constlength=10;

vari:integer;

begin

fori:=1tolengthdowrite(‘－’);

writeln;

end;

Begin

line;

writeln(‘Hello!’);

line;

End.

输出：――――――――――

Hello！

――――――――――

无参过程只能执行一种固定的功能,如调用line过程时,只能固定地画出10个‘－’的横线,如果要在调用时能灵活地画出不同长度的横线,就必须运用有参过程.

2．有参过程

有参过程可以在每次调用时,根据不同的参数处理不同的数据,更大程度地发挥过程的优越性.

【例2】利用过程,按需要画出不同长度的横线.

Programdrawline;

vari,x,n:integer;

procedureline(length:integer);{有参过程,length为形式参数}

vari:integer;

begin

fori:=1tolengthdowrite(‘－’);

writeln;

end;

Begin

readln(n);{n为需要画的横线条数}

fori:=1tondo

begin

readln(x);{x为每条横线的长度}

ifx0thenline(0)

elseifx100thenline(100)

elseline(x);{x为实际参数}

end;

End.

运行结果：

3↙

5↙

―――――

-4↙

8↙

――――――――

上例过程是含有参数的过程,在过程说明时,过程名后参数表中的参数称为形式参数,而在调用过程时,过程名后括号中的参数称为实际参数.每次调用过程时,通过实际参数对形式参数进行赋值.实际参数对应于过程说明中的形式参数,实参和形参的个数、类型要一一对应.

3．值参数和变量参数

有三种类型的参数：值参、变参和