procedure main()
every|{a:=read()&writes((&digits||&ucase)[a/(a>4^!420)%16+1]|"\n")}
end