求一VB代码,用数组保存随机产生的10个介于20到50之间的整数,编程求出其中的最大数、最小数和平均
答案:2 悬赏:0 手机版
解决时间 2021-02-27 10:19
- 提问者网友：沉默菋噵
- 2021-02-26 17:21
求一VB代码,用数组保存随机产生的10个介于20到50之间的整数,编程求出其中的最大数、最小数和平均
最佳答案
- 五星知识达人网友：行雁书
- 2021-02-26 18:13
Private Sub Command1_Click()RandomizeDim a(1 To 10)Dim max,min,avemin = 50:max = 20For i = 1 To 10a(i) = Int(Rnd * 21 + 30)Print a(i);If max If min > a(i) Then min = a(i)ave = ave + a(i)Next iave = ave / 10PrintPrint 最大值, 最小值, 平均值Print max,min,aveEnd Sub
全部回答
- 1楼网友：春色三分
- 2021-02-26 18:56
这下我知道了
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯