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

题干

下列VB程序运行时,单击命令按钮Command1后,在文本框Text1中输入“1024”,语句“a(i)=a(i+1)/2”共被执行了________次。
Private Sub Command1_C1ick ( )
Dim a(9) As Integer
a(9)=Val(Text1.text)
For i="8" to 1 step -2
a(i)=a(i+1)/2
Next i
Text2.text=str(a(i))
End Sub
上一题 下一题 0.99难度 填空题 更新时间:2015-08-20 08:14:27

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

同类题1

以下语句运行后变量c的值是( )
a=”2009”
b=”2008”
c=Val(a)+Val(b)
A.2009+2008B.4017C.”20092008”D.20092008

同类题2

解决上问题所用的算法是:(    )
A.枚举法B.解析法C.顺序查找D.选择法

同类题3

下面程序的功能是:计算表达式1×2×3×……×10的值,并在文本框Text1中输出表达式的值。为了实现这一功能,则程序中划线处的语句应更正为
(1)  
(2)  
(3)  
Private Sub Command1_Click()
Dim I As Integer, t As Long
t = 0 (1)
For i =" 1" To 10
t =" t" + i(2)
Next i
Text1.caption =" Str(" t )  (3)
End Sub

同类题4

如下程序段运行后,k的值是   
Dim d(1 to 5)  As Integer
k=0
For i="1" to 5
d( i )=i
If d( i )>k Then k="d(" i )
Next i
Print k

同类题5

写出下列程序的输出结果
Private Sub Command1_Click()
For i =" 1" To 4
If i Mod 3 <> 0 Then s =" s" + (-1) ^ (i + 1) * 1 / i
Next i
MsgBox s*100
End sub
该程序的运行结果是(   )  
A.-25B.-75C.15D.25
相关知识点
  • 算法理论
  • 算法实例的程序实现
  • 递归算法及程序实现
刷题宝 没有分数是刷题提高不了的! 粤ICP备12066032号

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