树形查找二叉排序树：每个结点的值都大于其左子树任

参考答案:

正确答案：

begin
q:=root;
while (q<>nil) and (q^.key<>k) do
if k<q^.key then q:=q^.left
else q:=q^.right;
treesrh:=q;
end;