​​

x=25: y=20

If  x>y  Then

       y =y+20

       If  y>50 Then y=y^2

Else

       y=y^2

       y=x+y

End  If

Label1. Caption=Str(y)

该程序段执行后，标签Labell中显示的内容是（  ）

程序运行时，先随机生成15个[1，30]区间内的整数，存储在数组a(0)至a(14)，并在文本框Text1中显示；单击“计算”按钮Command1，则在标签Labe14中显示连续三数最大和，在标签Label5中显示连续三数最小和，程序运行界面如图所示。

实现上述功能的VB程序如下，请在划线处填入合适的代码。

Const n=14

Dim a(n) As Integer

Private Sub Form_Load()

'随机生成15个数,存储在数组元素a(0)～a(14)中,并显示在文本框Text1中

End Sub

Private Sub Command1_Click()

    Dim i As Integer, j As Integer, k As Integer

    Dim imax As Integer, imin As Integer

    Dim smax As Integer, sum As Integer, smin As Integer

    smax=0:smin=100

    For i=0 To 14

        j= {#blank#}1{#/blank#}

        k= {#blank#}2{#/blank#}

        sum=a(i)+a(j)+a(k)

        If sum>smax Then

            smax=sum

            imax=i

        End If

        If sum<smin Then

            smin=sum

            imin=i

        End If

    Next i

    Label4.Caption=Str(smax)

    Label5.Caption=Str(smin)

End Sub

def f(a,b):

    if a<b:

        return a+b

    else:

        return f(a-b,a+b)

执行语句 x=f(18,-2)后， x 的值为（   ）