刷题首页
题库
高中信息
题干
[0,500]范围的十进制数转八进制的VB程序段如下:
n=Val(Textl.Text)
a(1)=0:a(2)=0:a(3)=0
For i=1 To n
j=3:a(j)=a(j)+1
Do While a(j)=8
Loop
Next i
s=a(1)&a(2)&a(3)
方框中的代码由以下三部分组成
①a(j)=a(j)+1
②a(j)=0
③j=j-1
代码顺序正确的选项是
A.①③②
B.③②①
C.②③①
D.②①③
上一题
下一题
0.99难度 选择题 更新时间:2019-08-11 04:23:54
答案(点此获取答案解析)
同类题1
对X四舍五入保留4位有效数字
同类题2
对下列程序段的说法正确的是( )
Private sub Command1_Click()
Dim s, i As Integer
s=0
i=1
For i="1" to 4 step 2
s=s+i^2
Next i
Print "s=";S
End Sub
A.该程序段执行后s的值为10
B.该程序段执行后s的值为30
C.该程序段执行后i的值为4
D.该程序段执行的结果为s=10
同类题3
在VB中,下列与表达式Len (“-20”) +20的值相等的是:( )
A.Str(20)“+3”
B.Sqr(25)+20
C.Val(“-20”)+20
D.Abs(-3)+20
同类题4
用Visual Basic随机函数产生10~99的幸运号码,下列符合要求的表达式是( )
A.Int(Rnd() * 9) + 90
B.Int(Rnd() * 90) + 10
C.Int(Rnd() * 89) + 10
D.Int(Rnd() * 99) + 1
同类题5
输出的结果为
。
相关知识点
算法理论
面向对象程序设计 VB开发工具
常用的标准函数
解析算法及程序实现