program main implicit none integer::i,j,k,n character(1000)::str,ans read*,n do i=1,n read*,str str=trim(str) write(*,'(a)',advance='no')str end do print*,"" end program