Стек - это линейный список, в котором все включения и исключения элементов делаются на одном конце списка. Принцип организации стека: "Последний пришел - первый вышел", что сокращенно обозначают также LIFO (‘Last In – First Out’). Стеки довольно широко применяются в программировании.
В дальнейшем будем считать, что в каждом фрагменте программы, иллюстрирующей методы формирования и обработки стека, действует описание
Type PoinType = ^DynType;
DynType = record
Inf : integer;
Next : PoinType;
end;
Var Beg, { указатель входа в стек }
Run : PoinType; { текущий указатель }
k : integer;
F : text;
