var
  s1,s2,s3,s4,s5 : string;
  d1,d2,d3 : longint;
begin
  readln(s1);
  readln(d1);
  s3:=copy(s1,1,d1);
  s2:=copy(s1,d1+1,d1+1);
  writeln(s3,'+',s2);
end.