お題：『16進表記の文字列に変換したときに何桁になるか』
Delphi:
function HexLength(a:Cardinal):Integer;
begin
a := a or 1;
a := a or (a shr 16);
a := a or (a shr 8);
a := a or (a shr 4);
a := a or (a shr 2);
a := (a or (a shr 1)) and $11111111;
a := a+(a shr 16);
a := a+(a shr 8);
a := a+(a shr 4);
Result:=( a and $f);
end;


c:
int HexLength(unsigned a)
{
a　= a　|　1;
a　= a　|　(a >> 16);
a　= a　|　(a >>　8);
a　= a　|　(a >>　4);
a　= a　|　(a >>　2);
a　=(a　|　(a >>　1))　& 0x11111111;
a　= a　+　(a >> 16);
a　= a　+　(a >> 8);
a　= a　+　(a >> 4);
return　a　& 0xf;
}

10進数を１６進数に変える方法について
http://pc.2ch.net/test/read.cgi/tech/1007222280/
よりコピペ