Динамические структуры данных. Pascal

[Alex Joy]

Дан адрес P1 записи типа TNode, содержащей поле Data (целого
типа) и поле Next (типа PNode — указателя на TNode). Эта запись связана
полем Next со следующей записью того же типа. Вывести значения полей
Data обеих записей, а также адрес P2 следующей записи.

[Stilet]

writeln(p1^.Date);
writeln(p1^.next^.Date);
writeln(integer(p1^.next));