$Rand=Random(-100, 100, 1)
MsgBox(0,"第1题--2变64",BitShift(2,-5))
MsgBox(0,"第2题--高低位互换",Hex(BitRotate(0x2D041020,16,"D")))
MsgBox(0,"第3题--奇偶判断(1奇0偶)"&$Rand,"结果为:"&BitAND($Rand,1))
MsgBox(0,"第4题--正负判断(1负0正)"&$Rand,BitAND(BitShift($Rand,31),1))
MsgBox(0,"第5题--后三位判断(结果为7符合)"&$Rand,BitAND($Rand,7))
MsgBox(0,"第6题--7变13/13变7","7==>"&BitXOR(7,10)&@CRLF&"13==>"&BitXOR(13,10))
MsgBox(0,"第7题--右起第十位取反",BitXOR(36615,0x00000200))
MsgBox(0,"第8题--取末尾连续1"&$Rand,BitShift(BitXOR($Rand, $Rand + 1), 1))
MsgBox(0,"第9题--取绝对值"&$Rand,BitXOR($Rand,BitShift($Rand,31))+BitAND(BitShift($Rand,31),1))
MsgBox(0,"第10题--右起第1位取反"&$Rand,BitOR($Rand, 1))
我也不符合要求。 |