VB随机产生10个两位数,求出他们的总和及平均数.（或按奇偶行排列）

发布时间：2021-02-25 12:11:48

VB随机产生10个两位数,求出他们的总和及平均数.（或按奇偶行排列）

网友回答

Randomize
dim a(10) as integer
sum=0for i=1 to 10
a(i)=int(rnd*90+10)
sum=sum+a(i)
nextPrint SUM: & Sum
avr=sum /10
Print Average: & Avr
以上问题属网友观点，不代表本站立场，仅供参考！