单链表的删除操作 procedure delete（L:linklist; I:integer);var p,q:pointer;

单链表的删除操作

procedure delete(L:linklist; I:integer);

var p,q:pointer;