ВУЗ:
Составители:
Рубрика:
35
объекты, или объектно-ориентированным программированием. Отметим также,
что важной составной частью объектно-ориентированного программирования яв-
ляются наследование классов и полиморфизм, с которыми мы познакомимся в
дальнейшем.
3.2 Классы: основные понятия
АТД «Стек» на базе линейного односвязного списка (класс)
Оформим реализацию АТД «Стек» на базе линейного односвязного списка с
помощью класса. После этого дадим определения основных понятий, связанных с
классами. Далее приводится текст класса, реализующего стек целых чисел.
type
PNode=^Node;
Node=record
data: integer;
next: PNode;
end;
Stack = class
private
head: PNode;
public
constructor Create;
destructor Destroy;
procedure Push(i: integer);
function Pop: integer;
function Top: integer;
function IsEmpty: boolean;
end;
function NewNode(data: integer; next: PNode): PNode;
begin
New(Result);
Result^.data:=data;
Result^.next:=next;
end;
constructor Stack.Create;
begin
head:=nil;
end;
destructor Stack.Destroy;
begin
while not IsEmpty do
Страницы
- « первая
- ‹ предыдущая
- …
- 31
- 32
- 33
- 34
- 35
- …
- следующая ›
- последняя »