program abc15
 implicit none
 integer::K
 character(len=100)::S,T
 read(*,*)K
 read(*,*)S
 if(len_trim(S)<=K)then
  print'(a)',trim(S)
  stop
 else
  T=S(1:K)//"..."
  print'(a)',trim(T)
 end if
end program abc15