var
  d1,d2,d3,d4,d5,d6 : longint;
  s1,s2,s3,s4,s5,s6 : string;
  c1,c2,c3,c4,c5,c6 : char;
begin
  readln(s1);
  readln(d1);
  d1:=pos(s1[d1],s1);
  writeln(s1[d1]);
end.