788
правок
Fantom78 (обсуждение | вклад) |
Fantom78 (обсуждение | вклад) |
||
IF l.len>1 THEN (* если в списке более двух элементов *)
el:=l.end; (* найти последний элемент *)
el1:=el.backward;(* найти
el:=NIL; (* последний элемент удалить *)
l.end:=el1; (* последним сделать предпоследний *)
INC(l.len);
END Remove;
</source>
Удалять элементы проще, чем вставлять, так как не приходится думать об удалённом элементе. Но в любом случае, надо контролировать ссылки.
==== Заполнение списка ====
Метод будет реализован с помощью цикла FOR. Необходим только для первоначального заполнения списка.
<source lang="oberon2">
</source>
|
правок