下面程序运行后,输出结果为( )。 Dim a() a=Array(1,3,5,7,9) S=0 For i=1 to 4 S=s*10+a(i) next i pnnt S

admin2020-09-01  20

问题 下面程序运行后,输出结果为(    )。
    Dim a()
    a=Array(1,3,5,7,9)
    S=0
    For i=1 to 4
    S=s*10+a(i)
    next i
    pnnt S

选项 A、1357   
B、3579
C、7531
D、9753

答案B

解析 在VBA中定义数组如果没有指明下限一律默认为0,因此a=Array(1,3,5,7,9)
    即a[0]=1,a[1]=3,a[2]=5,a[3]=7,a[4]=9。第一次循环时,s=0}10+a[1]=3;第二次循环时,s=3*10+a[2]=35;第三次循环时,s=35*10+a[3]=357;第四次循环时,s=357*10+a[4]=3579,正确答案为B选项。
转载请注明原文地址:https://kaotiyun.com/show/BScp777K
0

最新回复(0)