从键盘上输入一批正整数（如果遇到负数重新输入，如果遇到0停止输入），输出：

（VB）从键盘上输入一批正整数（如果遇到负数重新输入，如果遇到0停止输入），输出：
（1）输入的正整数的平均值；
（2）高于平均值的正整数的个数。

如何用do……while循环输入数组？

a = []
while True:
    n = int(input)
    if n > 0:
        a.append(n)
    elif n<0:
        print("重新输入")
    else:
        break
print(sum(a)/len(a))
count = 0
for i in a:
    if i >sum(a)/len(a):
        count += 1
print(count)