从键盘输入一批（不少于 10 个）任意数据，去掉其中的最大数和最小数，求剩余数据的平均值
就那个找最大最小的怎么截至
vb10个数字找最大最小值怎么解决
答案:1 悬赏:40
解决时间 2021-11-10 04:53
- 提问者网友：逐野
- 2021-11-09 23:37
最佳答案
- 二级知识专家网友：专属的偏见
- 2021-11-09 23:52
假设n个数字存储在num(n-1)里面
dim minnum as double,maxnum as double,temp as double,i%
temp=num(0):minnum=num(0);maxnum=num(0);
for i=1 to n-1
temp=temp+num(i)
if minnum>num(i) then minnum=num(i)
if maxnum<num(i) then maxnum=num(i)
next
temp=(temp-maxnum-minnum)/(n-2)
dim minnum as double,maxnum as double,temp as double,i%
temp=num(0):minnum=num(0);maxnum=num(0);
for i=1 to n-1
temp=temp+num(i)
if minnum>num(i) then minnum=num(i)
if maxnum<num(i) then maxnum=num(i)
next
temp=(temp-maxnum-minnum)/(n-2)
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯