Пример организации односвязного списка приведен ниже.
Type
Z=Record {комбинированный тип для данных}
a: String; {строковое поле}
b, c: Integer; {поле целых чисел}
d: Real {поле вещественных чисел}
end;
P=^S; {тип указатель записи базового типа S}
S=Record {базовый тип для указателей типа Р}
ls:P; {поле типа Р ссылки на следующую запись}
Dt:Z {поле типа Z записи данных}
end;
В этом примере типы Z и S введены для описания переменных - записей, содержащих в своих полях a, b, c, d данные, соответствующие описанным типам полей. P - тип указатель для динамических переменных базового типа S, т.е. значения переменных типа P будут адресами переменных типа S.
Наличие у комбинированной переменной типа S адресного поля ls типа P позволяет включать в состав записи ссылку на последующую запись и хранить таблицы в памяти машины в виде динамических списков связанных записей.
Var
Dt:Z; {запись данных}
Uz,U:P {указатели заглавного и текущего звеньев списка}
