题目

有如下VB程序段：s=“7218634594” : n=Len(s): c=0For i=1 To n-1 a(i)=Val(Mid(s, i, 2))Next iFor i=1 To n-2 Step 2 k=i For j=i+2 To n-1 Step 2 If a(j) < a(k) Then k=j Next j If k <> i Thent=a(i): a(i)=a(k): a(k)=t: c=c+1 End IfNext iText1.Text=Str(c)该程序段运行后，Text1中显示的内容是（ ） A . 1 B . 2 C . 3 D . 4 答案：B住宅装修完毕，室内空气中含有较多的苯、甲醛、氡等有害气体，除去这些有害气体的根本方法是（ ）A．关闭门窗，放大量的茶叶B．关闭门窗，放大量的醋C．喷空气清洁剂D．打开门窗，通风透气