program hina_arare
  implicit none
  integer :: n, i
  character(1) :: s(100)
  read(*,*) n
  read(*,*) s(1:n)
  do i = 1, n
    if (s(i) == "Y") then
      write(*,'(a)') "Four"
      stop
    end if
  end do
  write(*,'(a)') "Three"
end program hina_arare