program sample
	implicit none
    character(len=3) ::a,b,c
    integer :: x(3)
    
    read(*,*) a,b,c
    
    
    write(*,'(a,X,a,X,a)') trim(adjustl(c)),trim(adjustl(a)),trim(adjustl(b))
    
    stop
end program sample

