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的值