      PROGRAM piyo
      IMPLICIT NONE
      integer :: k, length
      character(100) :: s
      
      read*,k
      read*,s
      
      length = len_trim( s )
      
      if( length<=k )then
        print*,s
      else
        print*,s(1:k)//'...'
      end if
      
      
      
      
      
      END PROGRAM