S=0

For i=1 To 14

    x=2*i-1

    If x Mod 3 =0 Then s=s+1

Next i

s = Text1.Text

    ⑴    

i = 1: flag = True

Do While i <= n - 1 And flag

    If   ⑵   Then flag = False

    i = i + 1

Loop

If   ⑶    Then

    Label1.Caption = "重复数"

Else

    Label1.Caption = "不重复数"

End If

上述程序中方框处可选语句为：

①flag=False

②n=Len(s)

③Mid(s，i，1)=Mid(s，i+1，1)

则⑴、⑵、⑶处语句依次是（   ）

编写一个“合并重叠区间”的VB程序，功能如下：在文本框Text1中按各区间起始值升序依次输入各区间的起始值和终止值（数据都用逗号分隔并以逗号结尾），单击“确定”按钮后，在Text2中显示合并后的各个区间｡例如，在文本框Text1中输入“1，2，3，5，4，6，9，12，10，11，”，表示区间[1，2]，[3，5]，[4，6]，[9，12]，[10，11]，合并后的区间分别为[1，2]，[3，6]，[9，12]｡程序运行界面如图所示，实现上述功能的VB代码如下：

Const n=100

Private Sub Cmd1_Click()

    Dim i As Integer, k As Integer, L As Integer, R As Integer

    Dim s As String, c As String, t As String, result As String

    Dim a(1 To n) As Integer

    s=   ①   : t=" ": k=0

    For i=1 To Len(s)

        c=Mid(s, i, 1)

        If c<>"," Then

                 ②      

        Else

            k=k+1

            a(k)=Val(t)

            t=""

        End If

    Next i

    L=a(1): R=a(2)

    i=3

    Do While i<=k

        If a(i)>R Then

            result = result+"("+Str(L)+","+Str(R)+"),"

            L=a(i): R=a(i+1)

            R=a(i+1)

        End If

            ③   

    Loop

    result=result+"("+Str(L)+","+Str(R)+"),"

    Text2. Text=result

End Sub

样例1：

输入： 2-163-91475-4

输出：正确

样例2：

输入： 2-163-91475-5

输出：错误

import random

a = [ 0 ] *5 ; i = 0 ; flag = True

while i < 5 :

    a[ i ] = random.randint( 1 , 8 )

    if i % 2 == 1 :

        a[ i ] = a[ i ] + a[ i - 1 ]

        flag = not flag

    elif a[ i ] % 2 == 0 and flag == False:

        i -= 1

 i += 1

执行该程序段后，列表a的值不可能的是（   ）

mw = input('请输入：')

res=''

i=0; j=0; n=len(mw)

while j<n:

    if i%2==0:

        mw+=mw[i]

    else:

        res+=mw[i]

    j+=1

    i+=1

print(res)

若输入的内容为python，输出的结果为（   ）