来自龙勇的问题
【用VB编程：随机产生10个0~100之间的随机整数,存放在一个数组中,然后求个元素和、平均值,统计大于平均值的元素个数并把它们显示出来.】
用VB编程：随机产生10个0~100之间的随机整数,存放在一个数组中,然后求个元素和、平均值,统计
大于平均值的元素个数并把它们显示出来.
1回答
2020-03-02 16:20
我要回答
请先登录
刘俊林
PrivateSubForm_Load()
Dima(10),i,x,jAsInteger
DimyAsString
Fori=0To9
Randomize
a(i)=Int(Rnd(1)*101)
x=x+a(i)
Nexti
Print"元素和="&x
Print"平均值="&x/10
Fori=0To9
Ifa(i)>(x/10)Thenj=j+1:y=y&CStr(a(i))&""
Nexti
Print"大于平均值的元素个数="&j
Print"大于平均值的元素："&y
Me.Refresh
EndSub
2020-03-02 16:23:35
最新问答
推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
- 质点的运动方程r=(t-0.5t^2)i+(1+2t+1/3*t^3)j,求t=2秒时加速度和速度?
- 质量为m的指点以初速度V0沿X轴作直线运动,起始位置在坐标原点处所受阻力与其速度成正比,即F=-kv式中k为常数,时它所经过的距离与它所能行经的总距离之比
- 【怎样写出一篇好文章?就是怎样将自己所想生动的写出来?】
- 【等待的滋味作文400字低级】
- since引导时间状语从句since引导的从句怎么用这句话有错吗?since21centuryago,thecomputeriswideuseforpersonaldailylife.怎么改
- 高中非谓语动词的时态和语态doingdonetodo主动一般式进行式完成式被动一般式进行式完成式
- 定语从句中关系代词that和which要怎么分?
- 定语从句中的that和which的区别
- 化学实验成功的关键是（）①严谨的科学态度②合理的实验步骤③正确的操作方法.A.①B.①②C.②③D.①②③
- 在一个英语句子中,有动词就不可以用助动词吗?（do或does),得用be动词吗?要绝对真确的答案,
- 氢氧根离子和铵根离子反应生成什么
- 几个热力学公式,内能既为状态函数,所以决定内能的变数和决定状态的变数一样多.对于简单的体系(例如,只含有一种化合物的单相体系),经验证明,在P、V、T中任选两个独立变数,再加上物质的
- 【帮我修改一下英语作文,四级的,水平有限,望理解,题目要求也在上面,Onlinemealorderingisanewlifestyleinrapiddevelopsociety.Especiallyinyoungstudentsatcollegeorstaffincompany.EveryoneknowsthatInternethaveh】
- 求此文章读后感常常能听到这样一种说法：「人的脑子用多了，会死掉许多细胞」、「人脑用多了会笨」，这种说法是没有科学道理的。事实上，人的身体的各个部位，几乎都是越用
- 【如何区分英语句子中的时态,语态和非谓语动笔呢?有些词以-ed,-ing结尾,不知道表示时态还是非谓语动词的意思】
- Ihavenoidea,后面可以直接接从句?Ihavenoideawhatyou'retalkingabout.Ihavenoidea貌似是完整的句子,拿whatyou'retalkingabout是什么从句呢?难道是双宾语?从语法上分析,貌似用Ihavenoideaaboutwhatyou're
- 跳伞运动员从2000米高处跳下开始下降过程中未打开降落伞假设初速度为0所受空气阻力随下降速度的增大而增大最大下降速度为50M／S运动员到离地面200M高处时打开降落伞在1秒中内速度
- 【铵根离子和氢氧根离子反应的离子方程式】
- 【铵根离子会与氢氧根离子反应吗?生成什么?】
- 总结一下高一学的钠和氯气的物理性质化学性质,制备,用途按课本上的总结
- 什么是英语的助动词,比动词,动词,第一人称是什么?第二人称?第三人称?
- 【石子空中静止下落,由于空气阻力,石子并非自由落体,已知加速度a=A-Bv(AB为常量）石子速度和运动方程哪位大大会做】
- 氢氧根先与铵根还是先与三价铁离子反应?还有为什么
- 非谓语动词的时态语态··动名词和现在分词是不是没进行式的?它们的完成进行式是不是没被动语态?报纸上和一些书上说动名词和现在分词的完成进行式的主动语态是“havingbeendoing”,被动
- 阅读下列材料，回答问题：材料一中国是世界上天文学起步最早，发展最快的国家之一，天文学也是我国古代最发达的四门自然科学之一。我国是欧洲文艺
- 在爱因斯坦提出引力波预言的百年后，2016年2月11日，美国科学家宣布成功探测到引力波。这对于我们进一步打开自然奥秘之门，了解我们在所在宇宙的过去与未来，将有非常重要的意义。引
- 如图所示，粗糙水平面AC与光滑的竖直面内的固定半圆轨道在C点相切，轨道半径R=0.1m，一质量为m的小滑块（可视为质点）从离C点为x的水平面上B处以初速度v0向右运动，并冲上半圆轨道，从
- 如何用微元法推导s=Vot+at2/2
- 我要英语单词中的前缀和后缀及其意义,有多少要多少请注明意义
- 【求感恩朋友的读后感读感恩朋友有感.】