考试
2020-03-15 04:12:39

9491 (11)下列是一个体操评分程序。设满分为10分,2

题目描述

(11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Pr



(11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Private Sub Command1_Click() Max=0 Mix=10 For i=1 To 20 n=Val(InputBox("请输入分数")) If n>Max Then Max=n If n>Mix Then Mix=n s=s+n s=s-Mix-Max P=s/18 Print"最高分";Max;"最低分";Mix Print"最后得分:";p End Sub

答案解析

00****17 Next i

加载中...
AI正在思考中,请稍候...