type
pbyte=^node;
node = record
info:byte;
next:pbyte;
end;

var
q,r:pbyte;

x,y:byte;

--------------------------------

1. 在new(q);之後要怎麼刪除記憶體配置

2. new(q); // new一個節點q

q.info:=x; // q的內容為X
q.next:=nil; // q沒有下一個節點

當要新增一個節點在q前面時,下面的寫法有錯嗎

new(r); // new一個新節點r
r.info:=y; // r的內容為y
r.next:=nil; // r沒有下一個節點
r.next:=q; // r的下一個節點為q
q:=r; // q指標=r指標

type
pbyte=^node;
node = record
info:byte;
next:pbyte;
end;

var
q,r:pbyte;

x,y:byte;

--------------------------------

1. 在new(q);之後要怎麼刪除記憶體配置

2. new(q); // new一個節點q

q.info:=x; // q的內容為X
q.next:=nil; // q沒有下一個節點

當要新增一個節點在q前面時,下面的寫法有錯嗎

new(r); // new一個新節點r
r.info:=y; // r的內容為y
r.next:=nil; // r沒有下一個節點
r.next:=q; // r的下一個節點為q
q:=r; // q指標=r指標

1.Dispose(q); //<----free it

2.如果要表示r.next等於q那就是

r.next:=q; // r的下一個節點為q

這一行就可表示了