vb 比大小 平均数 急急!!!!!!
从30-100(包含30 100)中随即出10个正整数,求最大值 最小值 平均值 并显示数组的值和结果
Private Sub Command1_Click()
Cls
Randomize
Dim a(10), min, max
min = 100
max = 0
For i = 1 To 10
a(i) = Int(Rnd * 70 30)
Print a(i);
If max < a(i) Then max = a(i)
If a(i) < min Then min = a(i)
sum = sum a(i)
Next i
ave = sum / 10
Print "平均数为:"; ave
Print "最大数为:"; max
Print "最小数为:"; min
End Sub。
答:详情>>
答:对于那些有志于穷尽数学奥秘的学生,他总是循循善诱地予以启发和教育,而对于那些急功近利、在学习上不肯刻苦钻研的人,则毫不客气地予以批评详情>>
问:中国近代数学研究和教育的奠基人是谁,他毕生追求“科学教育,教育救国”
答:第一个华罗庚 第二个陈景润详情>>
答:补课是比较错误的方式。我一直到高中毕业没补过课。爸妈也不管我,随我学什么。我打游戏和化学都挺好。现在在大学读书,很深刻地感受到教育是钱买不来的。在实验室做小型的...详情>>