以下程序段运行的结果是______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=TrueFor i=-1 To 5 j=j+l If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End IfNext Loop Print j

A．20

B．7

C．35

D．8

阅读下列材料，回答问题。材料一人是存在的事物存在的尺度，也是不存在的事物不存在的尺度。——普罗泰格拉材料二这种对赎罪券的谎谬宣传，使得那些有学问的人，对于保持大家对教皇的尊敬，也确实感到困难。对于俗人的怀疑和非难又是难以解答。——周一良、吴于廑主编《世界通史资料选辑》材料三社会秩序乃是为其他一切权利提供了基础的一项神圣权利。然而这项权利决不是出于自然，而是建立在约定之上的……就是共同意志的体现，代表所有人的权利与自由。这是至高无上的……不可侵犯，不得转让，不受限制，不准分割。——卢梭

材料二关于“赎罪券”的争论引发了什么运动？这场运动由谁引发？该运动的历史影响是什么？