vb编程电视歌手大奖赛设有10名评委

PrivateSubCommand1_Click()DimiAsLongDima,b,ca=Array(2,7,7,6,27,70,25)b=Array(79,27,32,41,57,66,70)Re

PrivateSubForm_Load()DoDimaAsSingle,bAsSingle,cAsSingle,pAsSingle,sAsSinglea=Val(InputBox("请输入三角形第1条

前两位选手抽走2号、7号题，第3位选手从1、3、4、5、6、8、9、10共8位中抽一个号，共有8种可能，每个数字被抽到的机会相等，所以抽中8号的概率为18．故选B．

话说楼上的已经很好了,还要在做什么?算了,给你个实例吧,添加一个command按钮,输入以下代码OptionExplicitPrivateSubCommand1_Click()DimresultAsL

PrivateSubForm_Click()Dima(50),m,s,n,ps=0n=0RandomizePrint"原数组"Form=0To49a(m)=Int(100*Rnd)s=s+a(m)Pr

以下代码为输入任意多个数字进行统计如果输入0则退出循环显示出统计结果PrivateSubCommand1_Click()DimiAsIntegerDimqAsIntegerDimoAsIntegerq

#includevoidmain(){\x09/*\x09你的程序除了这个问题外还有其他的问题\x09*/\x09intsum=0,i,b;\x09doubleavg;//定义浮点型,才能保存下来小数

设参赛男歌手有x人，则参赛女歌手为407-x人，可得方程：（407-x）×（1-19）=x-16  （407-x）×89=x-16，    

窗体加一按钮,一个文本框PrivateSubCommand1_Click()RandomizeFori=1To100Text1.Text=Int(Rnd*90)+10NextEndSu

……t=1s=0Fori=1To10t=t*is=s+tNexti再问：这个要用什么下拉列表呢？再答：Textbox代码是在Botton中完成！

我觉得,首先要去掉最高分和最低分（9.50和9.30）,然后除以5,就行了.去掉最高分和最低分,可以避免平均分受最高分太高或最低分太低的影响.

Alittlediscussionaboutthedevelopmentofthenationalmusicefromthepastyoungsingerscompetition

9.5*8=76去掉一个最高分和一个最低分的总成绩八指的是八个人打得分9.4*9=84.6去掉一个最高分的总成绩（包括最低分的成绩）就指的是就个人打得分9.51*9=85.59去掉一个最低分的总成绩（

本来,如果按我的想法,肯定和楼上一样.但是,鉴于楼主你这是作业,如果按照楼上的答案交上去,有两条路：1.要么老师开明,觉得你思路正确,符合现代社会；2.要么老师古板,觉得你的回答观点不对.我认为,青年

#include#include#includeintmain(void){inti=0;floatx=.0f,y=.0f,sum=.0f,max=-1.0f,min=1e20f;printf("请输

Dimarr(1To10)AsDoubleConstN=10PrivateSubCommand1_Click()RecordDimtempAsDoubleFori=1ToN-1Forj=1ToN-1I

给出代码比较简单.流程图你就根据代码来画吧sum=0fori=1to10a=1forj=1toia=a*jnextjsum=sum+anextiprintsum

除不尽保留两位小数即可.平均数=所有数之和÷11=105÷11≈9.54中位数=9.6众数=9.6再问：　　‍‍看看有木有更好的答案再答：如果你不想取近似数，就直接写分数形式平

PrivateSubCommand1_Click()s=0zf=0Fori=1To10s=InputBox("第"&i&"位评委给分:")zf=zf+sNextiPrint"总得分："&zfEndSu

似乎你的comments不正确阿：印象里应该是int类型的数据范围是：[-32768,+32767],ifsizeof(int)==2再问：这是原题  如果将max=100,min