操作实现部分 procedure initialise (var s:stack); var i integer; begin for i=1 to N do S.elements[i]:=m (x elem0 is an eler 一旦我们小心翼翼地完成了定义和实现， 我们就可以发布这个“数据结构”为一 个“数据类型”供别的程序员直接使用， 他们不用关心这个类型的所有实现细节， 就像我们自己使用int类型一样！ function begin (x return the top element of the stack x) top t=S.elements[S.last] end;操作实现部分 一旦我们小心翼翼地完成了定义和实现， 我们就可以发布这个“数据结构”为一 个“数据类型”供别的程序员直接使用， 他们不用关心这个类型的所有实现细节， 就像我们自己使用int类型一样！