Циклический список, вставка, удаление, печать списка Опции

[Jill]

ПЛЗ!!!
помогите, пожалуйста!!!
шарилась по инету - по циклическим спискам не могу найти описаловку процедур вставки, удаления и печати!!! а литературы вообще нет...

еще бы среднее арифметическое найти, но с этим я справлюсь...

[volvo]

Ну, и чем же, по-твоему, "кольцо с замком" так сильно отличается от обычного, НЕкольцевого списка? Телько тем, что в "замок" записывается заранее определенное значение, которое больше не может в списке встречаться (для надежной идентификации). И всё !!! В остальном - никаких отличий нет. Если ты ВНИМАТЕЛЬНО прочтешь вот эту тему:
FAQ: Динамические структуры данных
, то дальше проблем (с учетом вышесказанного) быть не должно.

[Guest]

у меня проблема с указателем последнего на первый элемент :-( голова уже квадратная - что куда переставить, чтоб список закольцевать??? ууууууууу :-(

[volvo]

Ну, например, вот так:

Type
  PItem = ^TItem;
  TItem = Record
    Data : Integer;
    Next : PItem;
  End;
...
Var Ring: PItem;

Begin
  Ring := new(PElement);
  With Ring^ Do Begin
    Data := 0; next := Ring; { <--- уже "закольцовано" }
  End;
  ...
End.

После этого значение = 0 в списке использоваться НЕ ДОЛЖНО...

[Guest]

спасибо! :-)

правда, у меня с нулями этими - прям заговор / предыдущая лаба - по очередям - "0- признак окончания ввода элементов очереди" / но это не страшно - главное в процедурах разобраться

еще раз спасибо ;-)

[Altair]

http://pascal.dax.ru/files/books/kolco_spis.zip

[Jill]

пасиба, теперь есть на что опереться... :-)
переписать ввод данных без нуля, по-моему IOResult подойдет...

пасиба за помощь, а то времени совсем мало осталось :-)