Function  f(m,n)  as integer

 Do while  m<>n

   Do while  m>n

   m=m-n

   loop

   Do while n>m

   n=n-m

   loop

 loop

f=m

end function

则f（24,10）的返回值是（   ）

实现上述功能的VB程序代码如下，但加框处代码有错，请改正。

Private Sub Command1_Click()

  Dim s As String, ch As String

  Dim ch2 As String, sum As Double

  Dim n As Integer, i As Integer

  s = Text1.Text

  n = Len(s)

  i = 1: sum = 0

  Do While                                    ＇①

    ch = Mid(s, i, 1)

    If ch >= "0" And ch <= "9" Then

      j = i

      ch2 = Mid(s, j, 1)

      Do While ch2 >= "0" And ch2 <= "9"

        j = j + 1

        ch2 = Mid(s, j, 1)

      Loop

      sum = sum + Val（ ）     ＇②

      i = j

    End If

    i = i + 1

  Loop

  Label3.Caption = Str(sum)

End Sub

①{#blank#}1{#/blank#} ②{#blank#}2{#/blank#} 

If x And y Then x=0

Else x=1后x的结果为（   ）。

def cal(n):

    if n <= 1:

        return 1

    if n % 2 == 0:

        return 2*cal(n-1)

执行语句k=cal(5)，则k的值为（   ）

if x>y:

 f=False

else:

 f=True

下列语句中与上述程序段功能相同的是（   ）