有下面程序代码: Private Sub Commandl)_Click( Dim sign As Integer sign=1 a=1:b=2 For k=1 To 5 c=a+sign*b a=b:b=c Print c: sign=-sign Nex

admin2015-11-24  30

问题 有下面程序代码:
Private Sub Commandl)_Click(
Dim sign As Integer
sign=1
a=1:b=2
For k=1 To 5
c=a+sign*b
a=b:b=c
Print c:
sign=-sign
Next k
End Sub
程序运行后,单击命令按钮Command1,输出结果是

选项 A、3-1 2-3-1
B、3 5 8 13 21
C、-1 1-2-1-1
D、3 4 5 6 7

答案A

解析 在每次循环中sign的值在1和-1之间来回变化,第一次循环时sign的值为1;在循环中c的值为a+sign*b,然后将b赋值给a,c赋值给b:因此第一次循环结束后c的值为3,a的值为2,b的值为3;第二次循环结束后c的值为一1,a的值为3,b的值为-1;第三次循环结束后c的值为2,a的值为一1,b的值为2;第四次循环结束后c的值为一3,a的值为2,b的值为-3;第五次循环结束后c的值为-1,a的值为-3,b的值为-1。
转载请注明原文地址:https://kaotiyun.com/show/QxLp777K
0

随机试题
最新回复(0)