Реферат: Реализация связанных списков на базе массивов

' вывод количества элементов

Debug.Print "count of elems = ", list1.GetCount - 1

' заполнение списка случайными числами

Randomize

For i = 1 To 5

list1.AddItem Rnd() * 100

Next i

' вывод содержимого списка

list1.MoveFront

Do Until list1.IsEndOfList

Debug.Print list1.ReadItem

list1.MoveNext

Loop

' выводколичестваэлементов

Debug.Print "count of elems = ", list1.GetCount - 1

' удаление первого элемента

list1.MoveFront

list1.RemoveItem

' вывод содержимого списка

list1.MoveFront

Do Until list1.IsEndOfList

Debug.Print list1.ReadItem

list1.MoveNext

Loop

' вывод содержимого 2-го элемента

Debug.Print list1.ReadItem(2)

End Sub

Список литературы

Д. Кнут. Искусство программирования. (3-е издание) Т.1.

А.Г. Кушниренко, Г.В. Лебедев. Программирование для математиков. М: Наука. 1988, стр. 202-210.