单击一次命令按钮之后,下列程序段的执行结果为( )。 Pubic Sub Proc(a()As Integer)  Static i As Integer  Do   a(i)=a(i)+a(i+1)   i=i+1

admin2013-01-23  31

问题 单击一次命令按钮之后,下列程序段的执行结果为(    )。    Pubic Sub Proc(a()As Integer)     Static i As Integer     Do      a(i)=a(i)+a(i+1)      i=i+1     Loop While i<2    End Sub    Private Sub Command1_Click()     Dim m As Integer,i As Integer,x(10)As Integer     For i=0 To 4:x(i)=i+1:Next i     For i=1 To 2:CallProc(x()):Next i     For i=0 To 4:Print x(i);Next i    End Sub  

选项 A、3  4  7  5  6
B、3  5  7  4  5   
C、1  2  3  4  5
D、1  2  3  5  7

答案B

解析
转载请注明原文地址:https://jikaoti.com/ti/TwO0FFFM
0

最新回复(0)