03-PAS的CAL语言程序设计.ppt

PASCAL语言程序设计 任课教师 王养廷 主要内容 过程和函数 数组 记录 指针 1 过程和函数 函数与过程 过程的定义与调用 函数的定义与调用 过程与函数的区别 形参与实参 数值参数与变量参数 变量的作用域 1.1 函数与过程 例程 例程又称为子程序，它式结构化程序设计的产物 例程由一系列语句组成，例程名是唯一的，通过例程名你可以多次调用它。 Pascal例程 Pascal中的例程有两种形式：过程和函数。 过程与函数区别 过程相当一个语句 函数相当一个值 1.2 过程的定义与调用 过程定义 位置：在变量声明之后，主程序之前。 格式： procedure 过程名（形式参数表）； 常量定义； 类型定义； 变量定义； 过程或函数定义 begin 过程语句体； end; 1.2 过程的定义与调用(续) 过程调用 位置：同级过程、函数或同级主程序中 格式：过程名（实际参数表）； 要求：实参的个数和类型要与形参匹配 1.2 过程的定义与调用（续） 实例 过程定义 procedure NumString(n:integer, var s:array[1..10] of char); var v,j:integer; begin v:=abs(n); j:=2; repeat s[j]:= chr(v mod 10 + ord(‘0’)) ; v:= v div 10; j:=j+1; until v = 0; if n0 then s[1]:=‘-’ else s[1]:=‘ ‘ end; 过程调用 ...... NumString(-10, str); ... 1.3 函数的定义与调用 函数的定义 位置：在变量声明之后，主程序之前。 格式： function 函数名（形式参数表）：类型； 常量定义； 类型定义； 变量定义； 过程或函数定义 begin 函数语句体； end; 1.3 函数的定义与调用（续） 函数调用 位置：同级过程、函数或同级主程序中 格式：函数名（实际参数表）； 要求：实参的个数和类型要与形参匹配 1.3 函数的定义与调用（续） 实例 函数定义 function max(a,b:integer):real; var m:integer; begin m:=a; if(ba) then m:=b; max:= m; end; 函数调用 ...... x:=max(x,y); ...... 1.4 过程与函数的区别 区别 在程序中的语法成分不同 函数有类型说明 函数要求有返回值 为什么定义两种例程 pascal严格区分语句和表达式，分别设计了两种例程。 1.5 形参与实参 形参 过程或函数中，参数表中定义的参数 实参 过程或函数调用中，使用的参数 形参与实参的对应 要求过程或函数参数在个数和类型上要对应 可以使用兼容类型 1.6 数值参数和变量参数 数值的传入 把实参的值传给形参 实例 x:=max(x,y); 假设：x,y的值分别为10，20 在执行函数调用时，第一步是把两个数值传给形参a,b 这样在函数中参数a,b的值分别为10,20 1.6 数值参数和变量参数（续） 数值返回 函数或过程执行完成后需要返回结果 一般使用函数来返回数值 对于一些特殊情况需要使用参数返回结果数值 多个数值 复杂数据类型数值 过程返回值 1.6 数值参数和变量参数（续） 数值参数 不需要返回结果数值的参数 参数定义格式 变量表：类型； 举例 a,b:integer; 1.6 数值参数和变量参数（续） 变量参数 需要返回结果数值的参数 参数定义格式 var 变量表：类型； 举例 var a,b:integer; 说明 函数或过程执行完成后，需要把变参的结果返回给相应的实参 在调用中实参必须是一个变量 2 数组 枚举类型 子界类型 数组 数组应用 2.1 枚举类型 类型定义 定义一个星期中的各天的类型 type day=(sun,mon,tues,wed,thu,fri,sta); 变量定义 var payday,today,firstday: day; 2.1 枚举类型（续） 举例 program todaytomorrow(input,output); type day=(sun,mon,tues,wed,thu,fri,sat); var today,tomorrow:day; number:integer; begin read(number); 2.1 枚举类型（续） case number of 0:today:=sun; 1:today:=