Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Ногин Антон
64 / 12 / 3
Регистрация: 04.10.2009
Сообщений: 519
#1

Двусвязный список - Turbo Pascal

21.10.2010, 17:43. Просмотров 720. Ответов 1
Метки нет (Все метки)

Здравствуйте!
В FAQ по динамическим структурам данных есть процедура добавления нового узла
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure AddElem(var nach,ends:List;znach1:TInf);
begin
  if nach=nil then {не пуст ли список, если пуст, то}
  begin
    Getmem(nach,SizeOf(TList)); {создаём элемент, указатель nach уже будет иметь адрес}  {указатель и количество битов}
    nach^.next:=nil; {никогда не забываем "занулять" указатели}
    nach^.prev:=nil; {аналогично}
    ends:=nach; {изменяем указатель конца списка}
  end
  else {если список не пуст}
  begin
    GetMem(ends^.next,SizeOf(Tlist)); {создаём новый элемент}
    ends^.next^.prev:=ends; {связь нового элемента с последним элементом списка}
    ends:=ends^.next;{конец списка изменился и мы указатель "переставляем"}
    ends^.next:=nil; {не забываем "занулять" указатели}
  end;
  ends^.data:=znach1; {заносим данные}
end;
Это добавление в хвост списка?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.10.2010, 17:43
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Двусвязный список (Turbo Pascal):

Двусвязный список
Помогите написать процедуру ( для двусвязного списка) добавления элемента,такую...

Двусвязный список
Доброго времени суток. Помогите пожалуйста. Нужно на завтра решить задачу: ...

Двусвязный список
Помогите пожалуйста решить такую задачу, у меня мыслей ноль :( В заданиях...

Двусвязный линейный список.
Нужно создать линейный двусвязный список....Нужно чтобы были такие процедуры...

Создать двусвязный линейный список
Создать двусвязныйй линейный список по схеме Е (на картинке) и с условиями: 1)...

Двусвязный список, вывод на экран
Есть две процедуры вывода двусвязного псиска на экран. Print - в прямом...

1
Puporev
Модератор
54137 / 41770 / 28880
Регистрация: 18.05.2008
Сообщений: 98,313
21.10.2010, 17:47 #2
Ногин Антон, А как ты думаешь, словом ends что скорее назовут начало или конец?
А это
Цитата Сообщение от Ногин Антон Посмотреть сообщение
ends^.next^.prev:=ends; {связь нового элемента с последним элементом списка}
Вот как вам еще писать? На китайском что ли?
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.10.2010, 17:47
Привет! Вот еще темы с решениями:

Двусвязный циклический список в фиктивным элементом
Решаю задачки с динамической памятью. Вот односвязные списки более-менее...

Двусвязный список
Люди,срочно нужна помощь! Нужно написать операторы которые помогают вставить...

двусвязный кольцевой список
нужно написать следующие процедуры: -перемещение по списку(стрелки)...

Добавление элемента в двусвязный список.
Скажите пожалуйста как в двусвязный список добавить ещё 2 элемента? Вот...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru