用pascal 写一个双向链表。

“`”

回答：
用record作为节点类型

<pre><code> type
Node = record
Data : string;
Pre : ^Node;
Next : ^Node;
end;
TDoubleLinkList = class
public
procedure Create;
procedure Destroy;
{…Other Operation}
protected
{ to do }
private
{ to do}
end;
</code></pre>

<pre><code> "“`