给定一个正整数的二进制表示
来源:互联网 发布:域名能不能绑定多个ip 编辑:程序博客网 时间:2024/06/06 02:30
Private Sub Command1_Click()
Me.Font.Size = 30
Dim n As Byte
n = 23
Const er As Byte = 2
Dim shang As Byte
Dim yushu(1 To 5) As Byte
Dim i As Byte
i = 5
shang = n \ er
yushu(i) = n Mod er
While shang <> o
n = shang
i = i - 1
shang = n \ er
yushu(i) = n Mod er
Wend
Print yushu(1); yushu(2); yushu(3); yushu(4); yushu(5)
End Sub
任意一个数输出对应的二进制数
Print erjinzhi(230)
End Sub
Private Function erjinzhi(m As Byte) As String
Dim n As Byte
n = m
Const er As Byte = 2
Dim returns As String
Dim shang As Byte
Dim yushu(1 To 8) As Byte
Dim i As Byte
i = UBound(yushu)
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i)
While shang <> 0
i = i - 1
n = shang
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i) & returns
Wend
erjinzhi = returns
End Function
- 给定一个正整数的二进制表示
- 求给定一个正整数的二进制表示
- 求给定一个正整数的二进制表示 vb
- 给定一个正整数,找出一个数:与其二进制表示中1的个数相同,比该数大,而且最接近
- 给定一个正整数,找出一个数:与其二进制表示中1的个数相同,比该数小,而且最接近
- 给定你任意正整数,请你输出这个正整数的二进制表示中有几个1。
- 求给定一个正整数的十六进制表示 vb
- 给定一个整数,求它的二进制表示
- 9.5位操作(三)——给定一个正整数,找出与其二进制表示中1的个数相同,且大小最接近的那两个数
- 给定一个正整数n,找到小于或等于n的非负整数,其二进制表示不包含连续的整数。
- 将一个正整数用二进制表示
- 2016年4月28日VB 求给定一个正整数的二进制数
- 将一个正整数N用二进制表示并转化为一个string类型的值s
- 将一个正整数N用二进制表示并转换为一个String类型的值S
- 使用Haskell计算一个正整数二进制表示中最大的连续的1的个数
- 算法 - 求一个正整数的二进制表示中1的个数(C++)
- 如何高效的结算一个正整数中二进制表示1的个数
- 一个十进制的正整数在二进制表示中的数字个数(C实现)
- 工作日志——基于k8s搭建spark集群
- Python MySQL 数据库连接
- Qt:绘画箭头线段
- 开启文件管理时 URI获取文件路径为null的解决方法
- Qt Quick Material开源组件ApplicationWindow
- 给定一个正整数的二进制表示
- HTML5表单及其验证
- css属性触发和清除haslayout
- 【翻译】Xibo官方文档9-Tour-dashboard
- nyoj 116 士兵杀敌(二)树状数组
- 二进制数的表示
- 一、Android的webview的简单使用
- ListView常用的比较好用的属性
- css 自动出现滚动条