题库 高中信息

题干

下列二进制数与十进制数111等值的是()
A.1011111B.1101111
C.0111111D.0011111
上一题 下一题 0.99难度 选择题 更新时间:2016-03-07 11:41:26

答案(点此获取答案解析)

同类题2

(加试题)某数据解密方法描述如下:对输入的密文(由英文字母或阿拉伯数字组成的字符串)进行解密,解密后输出明文。解密时对密文中的每个字符进行如下处理:
(1)将该字符的ASCII码转换成对应的8位二进制;
(2)将对应的8位二进制数进行按位取反(1变0,0变1);
(3)将产生的8位二进制数循环左移2次;

图a
(4)将最后产生的8位二进制数转换成对应的十六进制数。
例如,密文小写字母“d”通过上述解密算法解密后生成的明文是“6E”,信息加密过程如图b所示。

图b
实现上述功能的VB程序如下:在文本框Text1中输入密文,单击“解密”按钮Command1,程序对密文数据依次进行解密处理,在文本框Text2中显示解密后生成的明文。程序运行界面如图c所示。

图c
实现上述功能的VB程序如下,请问答下列问题:
(1)如果输入密文为小写字母“a”,则解密后得到的明文是 ______________。
(2)请在划线处填入合适代码。
Function jiemi(m As String) As String  '将4位二进制数转换成相应的十六进制数
Dim k As Integer, i As Integer
Dim str As String
str = "0123456789ABCDEF"
k = 0
For i = 1 To 4

 k = k * 2 + Val(Mid(m, i, 1))

Next i
_______
End Function
Private Sub Command1_Click()
Dim ans As String, s As String, ch As String, ret As String
Dim s1 As String, s2 As String
Dim i As Integer, m As Integer, asc1 As Integer, n As Integer
s = Text1.Text
ans = ""
For i = 1 To Len(s)
ch = Mid(s, i, 1)     '取出第i个字符存入变量ch
asc1 = Asc(ch)
ret = ""
For m = 1 To 8 '完成解密步骤(1)和步骤(2)
______
ret = n & ret
asc1 = asc1 \ 2
Next m
ret = Mid(ret, 3, 6) + Mid(ret, 1, 2) '完成解密步骤(3)
s1 = jiemi(Mid(ret, 1, 4))
_________
ans = ans& s1 & s2 '将第i个解密后的字符添加到变量ans的末尾
Next i
Text2.Text = ans
End Sub