启教通信息平台
  首页 / 试题 / 高中信息技术 / 试题详细
  • 科目:信息技术
  • 题型:填空题
  • 难度:中等
  • 人气:1239

将一个十进制正整数x转换成十六进制数的方法和转换成二进制类似,反复除16取余法,它的算法如下:
第一步:x被除16取余数r1,r1是所求的十六进制数的一个数(第一次就是个位数);
第二步:r1转换成十六进制数的一个基数并转换成字符,追加到十六进制数S的左边;
第三步:求出x被除16的商x1;
第四步:对x1重复(1)、(2)、(3)过程,直至商为0;
第五步:最后的S即为所求的十六进制数;
下列Visual Basic程序的功能是将一个十进制正整数x转换成十六进制数。界面如图所示,在文本框Text1中输入一个十进制数制,单击“十进制转十六进制按钮”(Command1)后,在文本框Text2中输出转换的结果。相应的Visual Basic程序如下:

Private Sub Command1_Click()
Dim s As String, r As Integer
dec = val(Text1.Text)  ’dec得到一个十进制整数,例如:255;
base = 16  ’base表示16
s = ""  ’s变量存放要转换到的十六进制整数;
Do While dec <> 0
r =     ①   
If r >=" 10" Then  ’如果base>10进制,r可能>10;
s =" Chr(65" + (r - 10)) + s  ’ Chr (65)="A", 16进制数A对应10;
Else  ’ Chr (66)="B", 16进制数B对应11;
s =" Str(r)" + s  ’余数r<10时,十进制数和十六进制基数相同;
End If  ’Chr (65 +( r - 10))或str(r)在s左边,实现了反次序输出;
dec =     ②    
Loop
Text2.Text = s
End Sub
(1)在    ①    应填入( )
A.base Mod dec   B. dec / base   C.dec Mod base   D.dec \ base
(2)在  ②     应填入( )
A.base Mod dec   B.dec / base   C.dec Mod base   D.dec \ base

登录并查看解析

将一个十进制正整数x转换成十六进制数的方法和转换成二进制类似