以下程序的功能是：从键盘上输入若干个学生的成绩，计算出乎均成绩，并输出低于平均分的学生成绩，用输入负数结束输入。 Dim x(10)，sum，ave，a，n，i n=0 sum=0# a=InputBox("Enter mark:") Do While a＞=0 And n＜10 sum= 【12】 x(n)= 【13】 n=n+1 a=InputBox("Enter mark：") Loop ave= 【14】 Print "Output:" Print "ave="；ave For i=0 To n-1 If 【15】 ThenPrint x(i) End If

下列各项中，除哪项外，均为肛门直肠病的好发部位：

A．内痔好发于截石位3、7、11点

B．赘皮外痔好发于截石位6、12点

C．血栓外痔好发于截石位3、9点

D．肛裂好发于截石位3、9点

E．混合痔好发于截石位3、7、11点