Двунаправленные списки

[rrrFer]

Да не объясняйте, бесполезно. ТС ждет что ты вот щас возьмешь и напишешь ему реферат на 20 страниц.
Пока не напишешь он будет задавать тупые вопросы.
Я в первом посте указал ему книжку, там есть таблица, в которую сведены основные структуры и трудоемкость основных операций.

В книжке тыща примеров из профессиональной деятельности автора.
Он не читал. Какой смысл переписывать ему книжку на форум?

[Stilet]

Да не объясняйте, бесполезно.

Ну я так. Для затравки. )
Все равно на пальцах этого не рассказать, задач то и областей применения море, и варьируютя они согласно ТЗ и стандартам. Тут не угадаешь когда что эффективнее применить пока задачу не распотрошишь вдоль и поперек.

[Bugrimov]

Hitchi я в свое время, когда изучал списки, не столкнулся с такой серьезной проблемой поиска информации. Материала и примеров выше крыши . По-этому стоит только задаться целью. Я конечно могу Вам скинуть готовый код, но лучше самому разобраться, материал интересный и как мне кажется все-таки нужный.

[Hitchi]

А как вообще должен работать однонаправленный список, в котором есть 2 уже записанных узла, после запуска программы?

[Helloween]

Сверяется с телеметрией автора, если показатели зашкаливают и не происходит немедленной вставки третьего балансирующего элемента, то в результате неразрешимой коллизии происходит искажение пространства и взрыв.

[Hitchi]

Всё понятно

[rrrFer]

В императивных языках список - это данные. Список не может работать. Это не исполняемый код. Формализуй вопрос, будет нормальный ответ без телеметрии.

[Hitchi]

type 
spisok=^element;
element = record
 info:integer; 
 next:spisok; 
 end;
 
var first,elem,last:spisok; 
 
 begin
 
 New(elem); 
 elem^.next:=nil;
 elem^.info:=random(40)-20; 
 first:=elem;
 last:=elem; 
 

 
 New(elem);
 elem^.info:=random(40)-20;
 elem^.next:=nil;
 last^.next:=elem; 
 last:=elem; // 
 

 
 New(elem);
 elem^.info:=random(40)-20;
 elem^.next:=first; 
 first:=elem; 
 

 
 New(elem);
 elem:=first;
 first:=first^.next; 
 dispose(elem); 
end.

Как сделать из однонаправленного двунаправленный

[Fenex]

В каждом элементе списка указывать не только на следующий элемент, но и на предыдущий.

[rrrFer]

element = record
 info:integer; 
 next:spisok; 
 prev:spisok;
 end;