Основы программирования. Динамические массивы. Списки. Ассоциативные массивы. Деревья. Хеш-таблицы - 20 стр.

UptoLike

ВУЗ: 

ЮФУ | Ростов-на-Дону

Составители: 

Рубрика: 

22
Assert(cur<>nil);
Result:=cur.data;
end;
procedure List.SetData(d: integer);
begin
Assert(cur<>nil);
cur.data:=d;
end;
procedure List.Next;
begin
Assert(cur<>nil);
cur:=cur.next;
end;
procedure List.Prev;
begin
Assert(cur<>nil);
cur:=cur.prev;
end;
function List.Eol: boolean;
begin
Result:= cur=nil;
end;
procedure List.MoveFirst;
begin
cur:=f;
end;
procedure List.MoveLast;
begin
cur:=l;
end;
// Методы, осуществляющие вставку и удаление
// в позиции внутреннего итератора
procedure List.InsertBefore(x: DataType);
var v: PNode;
begin
Assert(cur<>nil);
if cur=f then
AddFirst(x)
else
begin
v:=NewNode(x,cur.prev,cur);

Страницы