判断一个数字是否是2的n次方

最新推荐文章于 2021-08-21 14:40:35 发布

yuxiaoyanranxt

最新推荐文章于 2021-08-21 14:40:35 发布

阅读量329

点赞数

分类专栏： sql 文章标签：数据库

本文链接：https://blog.csdn.net/yuxiaoyanranxt/article/details/106235533

版权

sql 专栏收录该内容

2 篇文章 0 订阅

订阅专栏

实现过程如下

Create Or Replace Function f_Get_2n(p_Num Number) Return Number Is
  v_Flag   Number(4);
  r_Binstr Number(38);
  l_Num    Number := p_Num;
  v_Length Number(38);
  v_Mid    Number(2);
Begin

  --先转换成二进制
  While l_Num != 0 Loop
    r_Binstr := To_Char(Mod(l_Num, 2)) || r_Binstr;
    l_Num    := Trunc(l_Num / 2);
  End Loop;
  --看最高位
  Select Substr(r_Binstr, 0, 1) Into v_Mid From Dual;
  --看去掉1后的长度 
  Select Length(Translate(r_Binstr, 'a1', ' ')) Into v_Length From Dual;
  --最高位为1  且 只有一位为1 
  If v_Mid = 1 And v_Length = Length(r_Binstr) - 1 Then
    v_Flag := 1; --是2的n次方
  Else
    v_Flag := 0;
  End If;
  Return v_Flag;
End;