program i_miss_you___
  implicit none
  character(100) :: s
  integer :: n, i
  read(*,*) s
  n = len_trim(s)
  do i = 1, n
    s(i:i) = 'x'
  end do
  write(*,'(a)') trim(s)
end program i_miss_you___