执行以下程序段后，x的值为( )。 Dim x As Integer,i As Integer x=0 For i=20 To 0 Step -2 x=x+i\5 Next iA．16B．17C．18D．19
题目
执行以下程序段后，x的值为( )。 Dim x As Integer,i As Integer x=0 For i=20 To 0 Step -2 x=x+i\5 Next i
A．16
B．17
C．18
D．19
相似考题
更多“执行以下程序段后,x的值为()。Dim x As Integer,i As Integerx=0For i=20 To 0 Step －2 x=x＋i\5N ”相关问题
-
第1题：
执行下列程序段后，x的值为______。
Dim x As Integer, i As Integer
x=0
For i=20 To 1 Step -2
x=x +i\5
Next i
正确答案：18
18 解析：本题考查VBA中循环和整除的知识。显然循环会执行10次，所以这个问题主要需要搞清楚每次循环累加的是什么数值。注意到每次累加的是i整除5的结果，i=20时累加一个4，i=18、16时累加两个3,i=14、12、10时累加三个2，i=8、6时累加两个1。 -
第2题：
执行以下程序段后，x的值为______。
Dim x As Integer,i As Integer
x＝0
For i＝20 To 1 Step -2
x＝x+i\5
Next i
正确答案：18
18 解析：本题考查VBA中循环和整除的知识。显然循环会执行10次，所以这个问题主要需要搞清楚每次循环累加的是什么数值。注意到每次累加的是i整除5的结果，i＝20时累加一个4，i＝18、16时累加两个3，i＝14、12、10时累加三个2，i＝8、6时累加两个1。 -
第3题：
执行下面的程序段后X的值为______。 x=5 For I=I To 20 Step2 x=x+I\5 Next I
A．21
B．22
C．23
D．24
正确答案：A
解析：循环第1次，1=1，所以1\5=0
循环第2次，I=3，所以I\5=0
循环第3次，l=5，所以1\5=1
循环第4次，I=7，所以1\5 1
循环第5次，I-9，所以1\5-1
循环第6次，I=11，所以I\5=2
循环第7次，I=13，所以I\5=2
循环第8次，l=15，所以1\5=3
循环第9次，I=17，所以I\5=3
循环第10次 I=19，所以I\5=3
循环结束后，x=5+1+1+1+2+2+3+3+3，所以x 21。
-
第4题：
执行以下程序段
Dim x As Integer，i As Integer
x＝0
For i=20 To 1 Step-2 x＝x+i\5
Next i
后,x的值为
A．16
B．17
C．18
D．19
正确答案：C
解析：本题需要提出的是“\”，该运算符是表示整除(截尾取整)，再者就是需注意该题干中的是循环变化的步长为-2。 -
第5题：
执行下面的程序段后，x的值为 ______。 x=5 For I=1 To 20 Step 2 x=x+I\5 Next I
A．21
B．22
C．23
D．24
正确答案：A
解析：For循环语句中，Step是表示步长，即循环计数器变化的幅度。本题中i每次加2，故要执行10次循环。而“\”是整除运算符，故当i等于1、3时，x都加0，当i等于5、7、9时，x都加1，当i等于11、13时，x都加2，当i等于15、17、19时，x加3。所以x=5+1*3+2*2+3*3=21。