program prob15
    implicit none
    character(len=5) :: a,b,c
    read(*,*) a,b,c

    write(*,'(a,1X,a,1X,a)') trim(adjustl(c)), trim(adjustl(a)), trim(adjustl(b))


    stop
contains
end program prob15