Использование указателей
Указатели обычно используют для построения списковых структур данных. Рассмотрим примеры построения некоторых наиболее распространенных видов списков.
Пример 1. Представление стеков
Каждый узел списка должен содержать по крайней мере два поля: одно поле типа указатель,
а второе – для хранения данных (INFO).
Type
L1 = ^Node;
Node = record
Info : char;
Link : L1;
End;
Предположим, что входной файл содержит некоторое число литер. Тогда формирование стека можно изобразить следующей последовательностью операторов:
Var
Top, K : L1;
Ch : char;
…………………….
Top := NIL;
While not eof Do
Begin
Read (Ch);
New (K);
K^. Link :=Top;
K^. Info :=Ch;
Top := K;
End;
Включение нового узла можно изобразить с помощью операторов:
Var
Newnode : L1;
……………………..
read (Ch);
new (Newnode);
Newnode^ . Link := Top;
Newnode ^ . Info := Ch;
Top := Newnode;
А удаление – с помощью одного оператора
Top := Top^ . Link;
Достарыңызбен бөлісу: |