主题：如何令指针指向前一个节点？？
pascaler
[专家分：150] 发布于 2006-02-25 20:50:00
如题~~谢谢~
回复列表 （共5个回复）
沙发
Benix [专家分：720] 发布于 2006-02-28 10:10:00
type point=^data
data=record
next,last:point
a:integer
end
var p,p1,p2:point
begin
new(p)
new(p1)
p1^.last=p
new(p2)
p1^.next=p2
p1=p2
end
大概写一写 就是这个意思了
板凳
Benix [专家分：720] 发布于 2006-02-28 10:11:00
其实就是双向链表的应用
3 楼
贺天行宝 [专家分：2300] 发布于 2006-02-28 21:01:00
type point=^data
data=record
next,pre:point
a:integer
end
var p,p1,p2:point
begin
new(p);
read(p^.a);
new(p1);
read(p1^.a);
p1^.pre:=p;
p^.next:=p1;
new(p2);
read(p2^.a);
p2^.pre:=p1;
p1^.next:=p2;
end
形象一点
4 楼
贺天行宝 [专家分：2300] 发布于 2006-02-28 21:02:00
多开个域表示前趋，理解一下巴
其实和表示后继的用法、定义一样的^_^
5 楼
pascaler [专家分：150] 发布于 2006-03-01 17:33:00
明白了~~谢谢
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 如何令指针指向前一个节点？？