program ABC089B
    implicit none
    integer(8)::N,i
    integer(8)::result=4
    integer(8),dimension(4)::C=0!P,W,G,Yの順で
    character(1),allocatable,dimension(:)::S
    read(5,*)N
    allocate(S(N))
    read(5,*)(S(i),i=1,N)

    do i=1,N
        if(S(i)=="P")then
            C(1)=C(1)+1
        else if(S(i)=="W")then
            C(2)=C(2)+1
        else if(S(i)=="G")then
            C(3)=C(3)+1
        else if(S(i)=="Y")then
            C(4)=C(4)+1
        end if
    end do

    do i=1,4
        if(C(i)==0)then
            result=result-1
            exit
        end if
    end do

    if(result==4)then
        print'(A)',"Four"
    else
        print'(A)',"Three"
    end if
end program ABC089B