发布网友 发布时间:1天前
共1个回答
热心网友 时间:1天前
dim S(1 to 20) as double
dim sum as double
dim max as double
dim min as double
for i=1 to 20
s(i)=inputbox("输入评委分数!")
next i
sum=0
max=s(1)
min=s(1)
for i=1 to 20
sum=sum+s(i)
if s(i)>max then max=s(i)
if s(i)<min then min=s(i)
next i
sum=(sum-max-min)/18
print sum
参考下吧