[填空題] 下面是一個體操評分程序。20位評委,除去一個最高分和一個最低分,計算平均分(設(shè)滿分為10分)。 Private Sub Command1_Click
2021-07-20
[填空題] 下面是一個體操評分程序。20位評委,除去一個最高分和一個最低分,計算平均分(設(shè)滿分為10分)。
Private Sub Command1_Click()
Max=0
Min=10
For I=1 To 20
N=Val(InputBox("請輸入分?jǐn)?shù)"))
If (12) Then Max=N
If N<Min Then Min=N
S=S+N
Next I
S= (13)
P=S/18
Print"最高分";Max"最低分";Min
Print"最后得分:";P
End Sub
Max
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。