module RED_OR_NOT
  sub Main(ByVal args() as String)
    dim a as integer
    dim s as string
    a=Console.ReadLine()
    if a >= 3200 then
      s="red"
    else
       s=Console.ReadLine()
    end if
    Console.WriteLine(s)
  end sub
end module