![[问答题] 编程题(26分)编写程序,对实验数据进行分组均化处理。处理的方法是:先将实验数据从小到大排序,然后按排序后的顺序每3个数作为一组,再用每组3个数的平均值作为这3个数的表现值。【编程,第1张](/aiimages/%5B%E9%97%AE%E7%AD%94%E9%A2%98%5D+%E7%BC%96%E7%A8%8B%E9%A2%98%2826%E5%88%86%29%E7%BC%96%E5%86%99%E7%A8%8B%E5%BA%8F%2C%E5%AF%B9%E5%AE%9E%E9%AA%8C%E6%95%B0%E6%8D%AE%E8%BF%9B%E8%A1%8C%E5%88%86%E7%BB%84%E5%9D%87%E5%8C%96%E5%A4%84%E7%90%86%E3%80%82%E5%A4%84%E7%90%86%E7%9A%84%E6%96%B9%E6%B3%95%E6%98%AF%3A%E5%85%88%E5%B0%86%E5%AE%9E%E9%AA%8C%E6%95%B0%E6%8D%AE%E4%BB%8E%E5%B0%8F%E5%88%B0%E5%A4%A7%E6%8E%92%E5%BA%8F%2C%E7%84%B6%E5%90%8E%E6%8C%89%E6%8E%92%E5%BA%8F%E5%90%8E%E7%9A%84%E9%A1%BA%E5%BA%8F%E6%AF%8F3%E4%B8%AA%E6%95%B0%E4%BD%9C%E4%B8%BA%E4%B8%80%E7%BB%84%2C%E5%86%8D%E7%94%A8%E6%AF%8F%E7%BB%843%E4%B8%AA%E6%95%B0%E7%9A%84%E5%B9%B3%E5%9D%87%E5%80%BC%E4%BD%9C%E4%B8%BA%E8%BF%993%E4%B8%AA%E6%95%B0%E7%9A%84%E8%A1%A8%E7%8E%B0%E5%80%BC%E3%80%82%E3%80%90%E7%BC%96%E7%A8%8B.png "[问答题] 编程题(26分)编写程序,对实验数据进行分组均化处理。处理的方法是:先将实验数据从小到大排序,然后按排序后的顺序每3个数作为一组,再用每组3个数的平均值作为这3个数的表现值。【编程,第1张")
[问答题] 编程题(26分)【题目】编写程序,对实验数据进行分组均化处理。处理的方法是:先将实验数据从小到大排序,然后按排序后的顺序每3个数作为一组,再用每组3个数的平均值作为这3个数的表现值。【编程要求】 1.程序参考界面如图所示,编程时不得增加或减少界面对象或改变对象的种类,窗体及界面元素大小适中,且均可见。 2.运行程序,单击"处理"按钮,出现如图所示的InputBox函数窗口,输入数据个数(或使用缺省值)后单击"确定"按钮,则生成10-40之间的随机整数数组并显示在实验数据文本框中,然后对实验数据进行排序并显示在排序结果文本框中,再进行分组均化并在文本框中输出数据均化结果;单击“清除"按钮,将3个文本框清空,焦点置于"处理"按钮上;单击"结束"按钮,结束程序运行。 3.程序中应定义一个名为sort的通用过程,用于对一维数组按从小到大排序。 【要求】 将窗体文件和工程文件分别命名为F2和P2,并保存到T盘根目录下。
正确答案：Option Explicit Option base A Private Sub CmdRun_Click() Dim a() As Integer,n As Integer,i As Integer Dim sum As Integer,av As Integer,k As Integer n=InputBox("输入数据个数:", ,AB) ReDim a(n) For i=A To n a(i)=Int(Rnd*DA)+A0 TextA=TextA & Str(a(i)
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）