题目

【加试题】有如下VB程序段：  S=“7218634594”：n=Len(s)  t=0  For i=1 To n-1         a(i)=Val(Mid(s，i，2))  Next i  For i=1 To n-2 Step 2       k=i       For j=i+2 To n-1 Step 2          If a(i)<a(k)Then k=j       Next j       If k<>i Then           temp=a(i)：a(i)=a(k)：a(k)=temp：t=t+1       End If    Next i    Text1．Text=Str(t)   运行程序段后， t的值为（  ） A . 1 B . 2 C . 3 D . 4 答案：B

查看本题答案和解析