New (curr);

2. curr ^. fam: = s;

Информационное поле fam по новому адресу принимает значение введенной с клавиатуры фамилии (Петров).

curr ^. next: = head;

Указатель нового элемента принимает значение указателя head, т.е. указывает на ячейку, на которую указывает head.

head

3. head: = curr; – head указывает на адрес нового элемента

Рассмотрим результат работы этой программы на экране.

vvod fam - Ivanov

vvod fam - Petrov

vvod fam - Sidorov

vvod fam –

vvedenii spisok: Sidorov

Petrov

Ivanov

Стек

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

LIFO

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

Пример: Создать стек для хранения целых чисел. Предусмотреть создание стека, т.е. добавление новых элементов по порядку. Затем организовать доступ к вершине стека и удаление элементов из стека. Вывести на экран их значения по порядку.

Условимся называть verh - указатель на вершину стека;

у – указатель текущего элемента при создании стека;

х – указатель текущего элемента при извлечении данных из стека;

а – переменная для ввода чисел с клавиатуры;

b – переменная для вывода чисел на экран.