刷题宝
  • 刷题首页
题库 高中信息

题干

[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) + 90B.Int(Rnd() * 90) + 10
C.Int(Rnd() * 89) + 10D.Int(Rnd() * 99) + 1

同类题5

输出的结果为 。
相关知识点
  • 算法理论
  • 面向对象程序设计 VB开发工具
  • 常用的标准函数
  • 解析算法及程序实现
刷题宝 没有分数是刷题提高不了的! 粤ICP备12066032号

本站仅为免费收集试题提供给学生刷题,不做任何盈利性活动!如无意侵犯您的合法权益,联系站长删除处理(QQ:2572127418)