高手帮忙：如何不用判断语句判断一个数的正负？？似乎有点难

Question

如： 
  通常我们用 IF I > 0 THEN... 来判断一个数的正负。请问哪位高手能不用判断语句来确定I的正负？

Answer 1

比如我想判断 －8 是正数还是负数，通常是采用 ：if -8 > 0 then －8是正数if -8 < 0 then －8是负数我现在有一个需求，不能用这样的判断语句判断－8是正数还是负数，不知有没有别的办法？

Answer 2

无论是怎么判断，都会用到if..then这是无法避免的。

Answer 3

function IsBiggerThanZero(i:integer):boolean;overload;
const
x=32;//根据不同数据类型的bit位数可以选定不同的数值。
var
t:cardinal;
begin
  t:=cardinal(i);
  result:=((t shr x)=0);
end;

Answer 4

更正一下：
result:=((t shr x)=0);
应该是：
result:=((t shr (x-1))=0);

Answer 5

var
  f:boolean;
begin
     f:=-8<0;//f为true
end;