利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值

问题描述:

利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值
VB 的题,

zd = Int(Rnd() * 51) + 50zx = Int(Rnd() * 51) + 50For i = 1 To 19xd = Int(Rnd() * 51) + 50If xd > zd Then zd = xdIf xd