.

q , p ; p , q . (table) , . .

()

q=nil

p=table

WHILE (p <> nil) do

IF key=k(p)

then SEARCH=p

next(q)=next(p)

next(p)=q

table=p

return

end IF

q=p

p=next(p)

end WHILE

SEARCH=0

return