program prob1
    implicit none
    character(19) :: s, t, u, v
    read(*,*) s, t, u
    v = trim(adjustl(s)) // ' ' // trim(adjustl(t)) // ' ' // trim(adjustl(u))
    write(*,'(a)') v

    stop
contains
end program prob1
