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

来源：学生作业帮助网编辑：作业帮时间：2024/04/29 11:21:43

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

利用随即函数产生50-100范围内的20个随即数,显示其中的最大值、最小值和平均值.
Option Explicit
Private Sub Command1_Click()
Cls
Dim mArr%(1 To 20), Max%, Min%, sum%, i%
Max = 50
Min = 100
For i = 1 To 20
Randomize
mArr(i) = Int(Rnd * 51 + 50)
If mArr(i) > Max Then Max = mArr(i)
If mArr(8) < Min Then Min = mArr(i)
sum = sum + mArr(i)
Print mArr(i)
Next
Print "最大值：" & Max
Print "最小值：" & Min
Print "平均值：" & sum / 20
End Sub

A1-A20
输入公式 =RANDBETWEEN(50,100)
最大值B1=MAX(A1：A20)
最小值C1=MIN(A1：A20)
平均值D1=AVERAGE(A1：A20)

最大值为100，最小值为50，平均值为75。
~O(∩_∩)O

利用随即函数产生50-100范围内的20个随即数,显示其中的最大值、最小值和平均值. 利用随即函数产生50到100范围内的20个随即整数,显示其中的最大值最小值和平均数. 尽量简单点 VB解决要产生30~35范围内的随即函数,采用的VB表达方式是?~ VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值 pascal 利用随机函数产生的20个50—100范围内的随机数,显示它们的最大值、最小值和平均值. 要产生30~35范围内（含30及35）的随即函数,采用的VB表达是? 用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写用vb编程：利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值. 利用计算器上的随即函数RANDI（10,20）,怎么操作?按什么键, 利用随机函数产生50-100范围内的20个随机整数,显示其中的最大值、最小值、平均值希望你们帮帮忙要求变量名;最大值max最小值min平均值avg；变量声明；在commandl-Click()事件中编写 EXCL随即函数例如5~20的随即函数,要求带两位小数利用随机函数产生50-100范围内的20个随机数,显示其中最大值,最小值和平均值(以下是我的部分代码,只产生了随机数,但不知道怎样挑出最值和计算平均?For i = 1 To 20a=Int(Rnd*51+50)Print a;Next i为什产生[100,500]的随即数的表达式利用随机函数产生50-100范围内的20个随机数,显示其中最大值,最小值和平均值Max = 49min = 101 for i= 1 to 20x = int (rnd* 50)+50 if x > max then max = xif x< min then min = xs = s+xnext i 以下的不打了 = = 上边的为由计算机产生100个在10~99范围内的随机整数,利用数组统计其中10~19,20~29..90~99的数各有多少产生[100,500]随即数表达式 rand随机数函数用法我想随即产生整数1-50之间的任意一个数赋值给int i;.请问该怎么使用? 谁知道怎么用matlab.产生随即500个1到100个随即整数