在声明循环链表时，不适用“先声明，后使用”的规则

type

PRec = ^TRec;

TRec = record

ID: Integer;

Next: PRec;

end;