Private Sub Form_Click()
Dim a(50),m,s,n,p
s = 0
n = 0
Randomize
Print "原数组"
For m = 0 To 49
a(m) = Int(100 * Rnd)
s = s + a(m)
Print Tab((m Mod 10) * 5); a(m);
If (m + 1) Mod 10 = 0 Then Print
Next
Print "平均值："; s / 50
For m = 0 To 49
If a(m) > s / 50 Then n = n + 1
Next
Print "超过平均值数值的个数"; n
End Su
最新问答： 6和7的公倍数是什么? 用英语怎么说呢?“当看到一个人努力的工作和加倍的学习时,谁能不感到敬畏呢?”这句话用英语怎么说? lnx^2的导数怎么做的具体点 硫酸、盐酸有哪些相似的化学性质?（写两条即可） 三张桌四把椅共530元,每把椅子比每张桌子便宜60元,各多少元? 问个初一科学问题（只等1个小时） 两肋插刀用英文怎么说 有6张看上去无差别的卡片,上面分别写着1,2,3,4,5,6.随机抽取一张后,放回并混在一起,再随机抽取一张,那么第二次 把下列各数填在相应的横线上 根号五,负三,零,三分之七,3.1415,根号2-1,根号121,负一 翻然醒悟的近义词 Thanks for your comprehension treasure he wears a blue dress and a white hat. 根据表内数据填空：（空气的密度为1.293g/L） 石墨中的化学键比金刚石中的牢固对吗? 望洞庭古诗 I’m sure that he will________every cent he owes you；I have__ 一个数与-2的和的1分之3和这个数与3的差相等（列方程） 已知S={四边形},A={Y|Y是两组对边分别平行的四边形}求A在S中的补集 某中学共800名学生为失学儿童捐款，图1条形统计图是从中抽取部分调查数据所作的统计图，图2扇形统计图是该校各年级人数比例 人体的血液占体重的十三分之一,血液里三分之二是水,爸爸的体重是78千克,他的血液大约含水多少千克?
相关问答： 函数
