随机产生10个1~100的正整数放入数组，显示产生的数，求最大值、最小值、平均值。

随机产生10个30~100(包括30、100)的正整数，保存到数组，并求最大值、最小值和平均值，最后显示数组每个元素的数值及计算结果。运行效果如下图所示。要求：用数组实现。保存工程和窗体，窗体文件名为：昵称-4-1.frm;工程名为：昵称-4-1.vbp。将工程文件和窗体文件压缩成：昵称-4-1.rar，以附件形式提交。

认真学习求最值的相关视频。随机产生10个30~100(包括30、100)的正整数，保存到数组，并求最大值、最小值和平均值，最后显示数组每个元素的数值及计算结果。运行效果如下图所示。要求：用数组实现。保存工程和窗体，窗体文件名为：昵称-7-1.frm;工程名为：昵称-7-1.vbp。将工程文件和窗体文件压缩成：昵称-7-1.rar，以附件形式提交。

下面程序的功能是产生10个小于100(不含100)的随机正整数，并统计其中5的倍数所 占比例，但程序不完整，请补充完整。 Sub PR() Randomize Dim a(10) For j=1 To 10 a(i)=Int(【 】) If【 】Then k=k+1 Print a(j) Next j Print Print k/10 End Sub

以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。

Option Base 1

Private Sub Form. Click()

Dim Arr(10) As Integer

Dim Max As Integer

Randomize

For I = 1 To 10

Arr(i) = Int (Rnd * 1000)

Next i

Max= ______

For i = 2 To 10

If______Then

Max = Arr(i)

End If

Next i

Print Max

End Sub

随机产生10个学生的成绩0~100(包括0、100)保存到数组，并求最大值、最小值和平均值，最后在图片框Picture1显示数组每个元素及统计结果。Private Sub Command1_Click() Dim a%(9), nMax%, nMin%, nAvg%, i% Randomize For i = 0 To 9 a(i) = Rnd * ______(1)______ Next nMax = a(0) nMin = ______(2)______ nAvg = a(0) For i = 1 To 9 If a(i) ＞ nMax Then nMax = ______(3)______ End If If a(i) ______(4)______ nMin Then nMin = a(i) End If nAvg = nAvg + a(i) Next ______(5)______ = nAvg / 10 Picture1.Cls For i = 0 To 9 Picture1.Print a(i) Next Picture1.Print "最大值："; nMax Picture1.Print "最小值："; nMin Picture1.Print "平均值："; nAvg End Sub 补全程序，在答题时，务必在答题框中写好题号和答案，如下： (1)： _________ (2)： _________ (3)： _________ (4)： _________ (5)： _________

/* 随机产生20个1到100之间的整数。要求将前10个元素与后10个元素的值对换， 即第1个元素与第20个元素对换，第2个元素与第19个元素对换，……，第10个元素与第11个元素对换。 输出数组原来各元素的值和对换后各元素的值。 */ #include ＜stdio.h＞ #include ＜stdlib.h＞ #include ＜time.h＞ int main() { int i,t,a[21]; //随机产生20个1到100之间的整数。此段程序不要修改 srand((unsigned)time(NULL ) ); //初始化随机数 for(i=1;i＜=20;i++) { a[i]="rand()*100/32767;" printf("%d ",a[i]); } printf("\n"); 前10个元素与后10个元素的值对换 ，请补充 输出交换后的元素，此段程序不要修改 for(i="1;i<=20;i++)" （提交程序和运行结果的截图）＞