Здравствуйте, Алена!
С праздниками!
Информация насчет стека в приложении.

Приложение:
{Стек}Type TP = ^SP SP = record INF : CHAR; LINK : TP;{Для организации и ведения стека должны быть предусмотрены два указателя: TOP и K}Var Top, K : TP; CH : CHAR;{Для добавления элемента в стек необходимо:-образовать динамическую переменную по указателю K-занести в нее нужную информацию-в поле указателя нового элемента занести значение указателя TOP-указателю TOP присвоить значение указателя K}NEW(K)K^.INF:=CH;K^.LINK:=TOP;TOP:=K;{Для удаления элемента из стека достаточно:-прочитать информацию CH:=TOP^.INF-в указатель TOP занести указатель удаляемого элемента TOP:=TOP^.LINK}K:=TOP;TOP:=K^.LINK;CH:=K^.INF;DISPOSE(K);{Формирование стека с самого начала. Стек из N элементов}TOP:=Nil;WHILE N>0 DOBEGIN NEW(K); READ(CH); K^.INF:=CH; K^.LINK:=TOP; TOP:=K; TOP:=K; N:=N-1;END;{Выбор всех элементов стека (самостоятельно)}REPEAT K:=TOP; TOP:=K^.LINK; CH:=K^.INF; WRITE(CH); DISPOSE(K);UNTIL TOP=NIL;

Здравствуйте, Алена!
Загляните на http://sources.ru/wiki/doku.php?id=pascal:linear_data_structure - там есть всё что вам нужно и даже больше. Правда на pascal... В дельфи итак уже есть готовые классы для многих динамических структур, например очередь (TQueue). Но, если надо самой сделать, то тогда смотрите ссылку