输出的结果为。DimnasintegerDimsaslongn=9s=0dowhilen>=1s=s+nn=n-2loopprin_刷题宝

题干

输出的结果为。
Dim n as integer
Dim s as long
n=9
s=0
do while n>=1
s=s+n
n=n-2
loop
print s

上一题下一题 0.99难度填空题更新时间:2016-03-16 10:35:06

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

同类题1

下列选项中，正确的赋值语句是_____。

同类题2

小明设计了如下所示累乘器程序，以完成式子：1×2×3×4×5×6的累乘计算。
Private Sub form_load()
Dim k As Long, i As Integer
k = 0 ……… ①
For i =" 1" To 6
k =" k" * i ……… ②
Next i
MsgBox Str(k)
End Sub
为了完成小明的计算，程序中标有①、②的两处语句，哪个语句应作相应的修改，修改后其正确的语句为（写出标号和正确的语句）_____________。

同类题3

VB程序中的赋值语句“x=x+1”是合法的。（）

同类题4

小明编写了如下VB程序段：
Private Sub Command1_Click()
Dim x As Double
Dim y As Double
x = Val(Text1.Text)
y = Abs(x)
x = int(y)
Text2.Text = Str(x)
End Sub
此应用程序执行后，出现了如第15题图所示的错误信息，请问产生此错误的原因是( )

A．语句y = Abs(x)有误

B．缺少对象‘424’

C．语句x = int(y)有误

D．缺少文本框Text1或文本框Text2

同类题5

某同学要制作一个计算商品团购优惠的VB小程序。请回答以下问题：
该同学绘制了该程序的流程图，如下图所示：

当n为100、p为10时，实付金额s的值是（）

相关知识点