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