《03-PASCAL语言程序设计.ppt》由会员分享，可在线阅读，更多相关《03-PASCAL语言程序设计.ppt（33页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、PASCAL语言程序设计任课教师王养廷主要内容1.过程和函数2.数组3.记录4.指针1 过程和函数1.函数与过程2.过程的定义与调用3.函数的定义与调用4.过程与函数的区别5.形参与实参6.数值参数与变量参数7.变量的作用域1.1 函数与过程n例程例程又称为子程序，它式结构化程序设计的产物例程由一系列语句组成，例程名是唯一的，通过例程名你可以多次调用它。nPascal例程Pascal中的例程有两种形式：过程和函数。n过程与函数区别过程相当一个语句函数相当一个值1.2 过程的定义与调用n过程定义位置：在变量声明之后，主程序之前。格式：procedure 过程名（形式参数表）；常量定义；类型定义；
2、变量定义；过程或函数定义begin 过程语句体；end;1.2 过程的定义与调用(续)n过程调用位置：同级过程、函数或同级主程序中格式：过程名（实际参数表）；要求：实参的个数和类型要与形参匹配1.2 过程的定义与调用（续）n实例过程定义procedure NumString(n:integer,var s:array1.10 of char);var v,j:integer;begin v:=abs(n);j:=2;repeat sj:=chr(v mod 10+ord(0);v:=v div 10;j:=j+1;until v=0;if na)then m:=b;max:=m;end;函数调
3、用.x:=max(x,y);.1.4 过程与函数的区别n区别在程序中的语法成分不同函数有类型说明函数要求有返回值n为什么定义两种例程pascal严格区分语句和表达式，分别设计了两种例程。1.5 形参与实参n形参过程或函数中，参数表中定义的参数n实参过程或函数调用中，使用的参数n形参与实参的对应要求过程或函数参数在个数和类型上要对应可以使用兼容类型1.6 数值参数和变量参数n数值的传入把实参的值传给形参n实例x:=max(x,y);假设：x,y的值分别为10，20在执行函数调用时，第一步是把两个数值传给形参a,b这样在函数中参数a,b的值分别为10,201.6 数值参数和变量参数（续）n数值返回
4、函数或过程执行完成后需要返回结果一般使用函数来返回数值对于一些特殊情况需要使用参数返回结果数值多个数值复杂数据类型数值过程返回值1.6 数值参数和变量参数（续）n数值参数不需要返回结果数值的参数参数定义格式变量表：类型；举例a,b:integer;1.6 数值参数和变量参数（续）n变量参数需要返回结果数值的参数参数定义格式var 变量表：类型；举例var a,b:integer;说明函数或过程执行完成后，需要把变参的结果返回给相应的实参在调用中实参必须是一个变量2 数组1.枚举类型2.子界类型3.数组4.数组应用2.1 枚举类型n类型定义定义一个星期中的各天的类型type day=(sun,m
5、on,tues,wed,thu,fri,sta);n变量定义var payday,today,firstday:day;2.1 枚举类型（续）n举例program todaytomorrow(input,output);typeday=(sun,mon,tues,wed,thu,fri,sat);vartoday,tomorrow:day;number:integer;beginread(number);2.1 枚举类型（续）case number of0:today:=sun;1:today:=mon;2:today:=tues;3:today:=wed,4:today:=thu;5:tod
6、ay:=fir;6:today:=sat;end;if today=satthen tomorrow=sunelse tomorrow=succ(day)end.2.2 子界类型n类型定义子界类型定义了某种类型的取值范围，这种类型必须是有序类型（如整型、字符型）。定义举例：Type Ten=1.10;OverHundred=100.1000;Uppercase=A.Z;2.2 子界类型（续）n类型说明定义子界类型时，你不需要指定基类的名字，而只需提供该类型的两个常数。所用基类必须是有序类型，定义结果将是另一种有序类型。赋给子界类型变量的值必须是子界定义范围内的值。n应用经常用于数组的定义2.3
7、 数组n数组用来表示一组相同类型的数据n定义Type DayTemperatures=array 1.24 of Integer;n说明方括号中填入一个子界类型的值，或者用两个有序类型的常量定义一个新的子界类型 2.3 数组（续）n数组类型变量的定义Var DayTemp1:DayTemperatures;n数组的引用 DayTemp1 1:=54;DayTemp1 2:=52;n多维数组Type MonthTemps=array 1.24,1.31 of Integer;YearTemps=array 1.24,1.31,Jan.Dec of Integer;2.4 数组应用n举例：输入一串
8、小写字母，以?结束，统计每个字母出现次数。program count(input,output);varnum:arraya.zof integer;ch:char;beginread(ch);while ch?dobeginif(ch=a)and(ch=z)then numch:=numch+1;read(ch)endend.3 记录n概念描述统一事物的不同属性n类型定义Type Date=record Year:Integer;Month:Byte;Day:Byte;end;n变量定义Var BirthDay:Date;3 记录（续）n使用 BirthDay.Year:=1997;Birt
9、hDay.Month:=2;BirthDay.Day:=14;n说明域的概念域的访问与类对比（C中的结构）n典型应用定义一个学生信息3 记录（续）n学生记录的定义Type Student=record name:string;age:integer;sex:integer;end;Var p:Student;n使用p.age:-=20;3 记录（续）n记录与数组的结合n题目：使用记录数组来输入一个班30人的信息，按照总成绩排序。学生信息包括：姓名、性别、年龄、民族（汉、蒙、满）、总成绩。n自己实现该程序，作为上机题目4 指针n概念指针是存放指定类型（或未定义类型）变量内存地址的变量 n类型定义type PointerToInt=Integer;n变量定义Var P:Integer;X:Integer;4 指针（续）n使用 P:=X;X:=10;P:=20;n说明号的作用号的作用空指针nil4 指针（续）n指针空间申请newn指针空间释放disposen举例VarVar P:Integer;BeginBegin New(P);P:=20;ShowMessage(IntToStr(P);Dispose(P);endend;小结n主要内容函数复合数据类型：枚举、子界、数组、记录、指针n上机题目：课上讲解例题、课后习题时间：第二周n答疑时间周二晚上单独约时间