n,k=gets.split.map &:to_i
s=gets
a=[]
z=0
1.upto(n){|i|
  if s[i-1]=='('then
    a+=[i]
  else
    j=a.pop
    i==k&&z=j
    j==k&&z=i
  end
}
p z