作业帮 > 综合 > 作业

十次循环给给十个元素产生一个随机数,十个循环求平均值、用完整的VB语言谢谢

来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:综合作业 时间:2024/05/12 07:37:45
十次循环给给十个元素产生一个随机数,十个循环求平均值、用完整的VB语言谢谢
十次循环给给十个元素产生一个随机数,十个循环求平均值、用完整的VB语言谢谢
dim N(10) as integer, dim m as single
dim i as integer
randomize
for i=1 to 10
n(i)=int(rnd*100) '100以内的随机数
next
'求平均数
for i=1 to 10
m=m+n(i)
next
m=m/10 'm即为平均值