print((1+8*(oct"0b".$_))**0.5%2-1?0:1),$\for<>