试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省高中信息技术 算法及VB语言基础单元检测
小张编写 VB 程序,实现如下功能:在前 100 个偶自然数中,计算恰好有四位为 1 的二进制数的个数, 如图所示,单击“计算”按钮 Command1,在文本框 Text1 中显示符合条件的个数,在列表框 List1 中显示符合条件的二进制数。VB 程序代码如下:
提示:本题“除 2 取余倒排法”的方法将十进制转化为二进制,算法如下: 例如十进制数“97”转化为二进制的过程如右图所示:
因此“97”二进制值为:1100001
m=1:k=1
For i=2 To 10
If a(i)<a(i-1)Then
k=k+1
If k>m Then m=k
Else
k=1
End If
Next i
Text1.Text=Str(m)
End Sub
执行该程序段,文本框Text1中显示的是 ( )
PRIVATE SUB FORMCLICK
FOR I = 3 TO {#blank#}1{#/blank#}
F=0
FOR J= 2 TO I-1
IF {#blank#}2{#/blank#} THEN
F=1
EXIT FOR
END IF
NEXT J
IF F=0 THEN {#blank#}3{#/blank#}
{#blank#}4{#/blank#}
END SUB
试题篮