type PNode = ^TNode; TNode = record Data : Integer; // Например, храним целое число. Или любой другой тип Next : PNode; end;
var A : Array Of PNode;