pascal第8章 指针和链表.pptVIP

第八章　指针与链表; 前面介绍的各种简单类型的数据和构造类型的数据属于静态数据。在程序中，这些类型的变量一经说明，就在内存中占有固定的存储单元，直到该程序结束。 程序设计中，使用静态数据结构可以解决不少实际问题，但也有不便之处。如建立一个大小未定的姓名表，随时要在姓名表中插入或删除一个或几个数据。而用新的数据类型──指针类型。通过指针变量，可以在程序的执行过程中动态地建立变量，它的个数不再受限制，可方便高效地增加或删除若干数据，这比修改一个记录数组更加方便。;指针的定义及操作 ; ③ Pascal规定所有类型都必须先定义后使用，但只有在定义指针类型时可以例外，如下列定义是合法的： 　type pointer=^rec; //允许rec类型后定义 　　　　　　rec=record 　　　　　　　　 a : integer; 　　　　　　　　 b : char 　　　　　　　 end; （2）开辟和释放动态存储单元 ① 开辟动态存储单元 在Pascal中，指针变量的值一般是通过系统分配的，开辟一个动态存储单元必须调用标准过程new。 new过程调用的一般格式： new(指针变量) 功能：开辟一个存储单元，此单元能存放的数据的类型正好是指针的基类型，并把此存储单元的地址赋给指针变量。;说明：1) 这实际上是给指针变量赋初值的基本方法。例如，设有说明：var p : ^integer; 这只定义了P是一个指示整型存储单元的指针变量，但这个单元尚未开辟，或者说P中尚未有值（某存储单元的首地址）。当程序中执行了语句new(p)才给ｐ赋值，即在内存中开辟（分配）一个整型变量存储单元，并把此单元的地址放在变量ｐ中。示意如下图：; ② 释放动态存储单元 dispose语句的一般格式：dispose(指针变量) 功能：释放指针所指向的存储单元，使指针变量的值无定义。例如： new(p); dispose(p); （3）动态存储单元的引用 在给一个指针变量赋以某存储单元的地址后，就可以使用这个存储单元。 引用动态存储单元一般格式：＜指针变量＞＾ 说明： ①在用New过程给指针变量开辟了一个它所指向的存储单元后，要使用此存储单元的唯一方法是利用该指针。 ②对动态存储单元所能进行的操作是该类型（指针的基类型）所允许的全部操作。;例8.1 设有下列说明： Var p : ^integer; i : integer; 画出执行下列操作后的内存示意图： New(p); P^ : =4; i : =p^; 【分析】 如下图所示。;（4）对指针变量的操作 前已述及，对指针所指向的变量（如Ｐ＾）可以进行指针的基类型所允许的全部操作。对指针变量本身，除可用New、Dispose过程外，尚允许下列操作： ① 具有同一基类型的指针变量之间相互赋值 例8.2 设有下列说明与程序段 : var p1,p2,p3 : ^integer; begin new(p1); new(p2); new(p3); p1 : =p2; //同一基类型的指针变量之间可以相互赋值 p2 : =p3; end;;② 可以给指针变量赋nil值 nil是Pascal的关键字，它表示指针的值为空。例如，执行： p1 : =ni1后，p1的值是有定义的，但p1不指向任何存储单元。 ③ 可以对指针变量进行相等或不相等的比较运算 在实际应用中，通常可以在指针变量之间，或指针变量与nil之间进行相等(=)或不相等()的比较，比较的结果为布尔值。;例8.3 输入两个整数，按从小到大打印出来。 【分析】 不用指针类型可以很方便地编程，但为了示例指针的用法，我们利用指针类型。定义一个过程swap用以交换两个指针的值。 程序如下： Type pointer=^integer; var p1,p2 : pointer; procedure swap(var q1,q2 : pointer); var q : pointer; begin q : =q1; q1 : =q2; q2 : =q; end; BEGIN new(p1); new(p2); readln(p1^,p2^); if p1^p2^ then swap(p1,p2); writel