执行以下程序段 Dim i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next Print x 后,x的值为______。A． 16B．17C．18D．19
题目
执行以下程序段 Dim i As Integer,X As Integer x=0 For i=20 To 1 Step -2 x=x+i\5 Next Print x 后,x的值为______。
A． 16
B．17
C．18
D．19
相似考题
更多“执行以下程序段Dim i As Integer,X As Integerx=0For i=20 To 1 Step －2 x=x＋i\5NextPrint x后,x ”相关问题
-
第1题：
执行以下程序段
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。 -
第2题：
执行下面的程序段后，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。 -
第3题：
执行下面的程序段后，X的值为( )。
X=1
FOR I = 1 TO 20 STEP 2
X=X+I\5
NEXT I
A．21
B．22
C．23
D．24
正确答案：A
解析：循环10次，每次均要完成X+I\5，最后累加结果为21。 -
第4题：
执行以下程序段后，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。 -
第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
解析：循环第1次，I＝1，所以I\5＝0；
循环第2次，I＝3，所以I\5＝0；
循环第3次，I＝5，所以I\5＝1；
循环第4次，I＝7，所以I\5＝1；
循环第5次，I＝9，所以I\5＝1；
循环第6次，I＝11，所以I\5＝2；
循环第7次，I＝13，所以I\5＝2；
循环第8次，I＝15，所以I\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。