20以内随机数 Vb随机函数产生20个10到50之间的数，放入数组，并且计算所有20个随机整数的平均值并输出？
Vb随机函数产生20个10到50之间的数，放入数组，并且计算所有20个随机整数的平均值并输出？在窗体中添加一个命令按钮，然后按如下方式单击事件代码：private sub command1 uclic
Vb随机函数产生20个10到50之间的数，放入数组，并且计算所有20个随机整数的平均值并输出？
在窗体中添加一个命令按钮，然后按如下方式单击事件代码：private sub command1 uclick（）将dim a（1到20）随机化为整数dim s为double for I=1到20 a（I）=int（rnd（）*40 10）s=s a（I）next I print s/20end sub观察数组a的值