新人求助，有没有大佬会数据结构吖X﹏X

[清酒儿]

用c语言写一个 删除单链表中值为key的第一个结点：查找值为key的结点是否存在，若存在，则删除；否则返回NULL。

[墨梅无痕]

胡闹！C语言的问题怎么跑到 Delphi 版来了？ 懒惰！这么重要的练习，一定要自己做！ 打屁屁！

[doloopcn]

引用 1 楼 墨梅无痕 的回复:

胡闹！C语言的问题怎么跑到 Delphi 版来了？
懒惰！这么重要的练习，一定要自己做！
打屁屁！

同感

function DeleteNode(var Node:TNode):TNode;
var
preNode,nextNode:TNode;
begin
Result:=nil;
preNode:=Node;
if preNode.Value='key' then
begin
Result:=preNode;
Node:=preNode.Next;
Exit;
end;
nextNode:=Node.Next;
while nextNode<>nil do
if nextNode.Value='key' then
begin
preNode.Next:=nextNode.Next;
Dispose(nextNode);
Result:=nextNode;
Break;
end
else begin
preNode:=nextNode;
nextNode:=nextNode.Next;
end;
end;

[xrbaa]

引用 1 楼 墨梅无痕 的回复:

胡闹！C语言的问题怎么跑到 Delphi 版来了？
懒惰！这么重要的练习，一定要自己做！
打屁屁！