程序代码至少100条,或程序由4个以上函数组成;怕浪费高追加分!!_百度...
发布网友
发布时间:11小时前
我来回答
共1个回答
热心网友
时间:8小时前
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
参考下吧