程序代码至少100条,或程序由4个以上函数组成;怕浪费高追加分!!_百度...
发布网友
发布时间：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
参考下吧
