for i:=1 to n do
          if key = r[i].k then found( r[i] );