Dim i As Integer, Sum As Integer

Dim a(1 To 11) As Integer

Sum = 6

a(11) = 49

For i = 10 To 1 Step -1

  a(i) = a(i + 1) - 1

  If a(i) Mod 3 = 0 Then Sum = Sum + a(i)

Next i

Text1.Text = Str(Sum)

该程序段运行后，文本框text1中显示的内容是（   ）

请回答下列问题：

n=int(input())

{#blank#}1{#/blank#}

for i in range(n+1):

    flag=False

    if i%7==0:

        flag=True

    m=i

    while {#blank#}2{#/blank#}:

        if m%10==7:

            flag=True

        m//=10

    if {#blank#}3{#/blank#}:

        sum=sum+i*i

print(sum)