VB程序设计题电子版.doc

上传者: 43934844 | 上传时间: 2022-06-20 18:04:44 | 文件大小: 40KB | 文件类型: DOC
程序设计题电子版 (事件)单击事件。 (响应)生成一个一维数组(10个数组元素依次为15、32、72、43、96、18、3、177、 88、17),写程序求出这个数组的最大值、最小值和平均值,并输出在窗体上。将最大 值、最小值、平均值分别存入变量Max、Min、Aver中。 答案: Dim a(9) As Integer Dim i, s As Integer a(0) = 15 a(1) = 32 a(2) = 72 a(3) = 43 a(4) = 96 a(5) = 18 a(6) = 3 a(7) = 177 a(8) = 88 a(9) = 17 Max = a(0) Min = a(0) s = 0 For i = 0 To 9 If a(i) > Max Then Max = a(i) End If If a(i) < Min Then Min = a(i) End If s = s + a(i) Next aver = Int(s / 10) Print (CStr(Max)) Print (CStr(Min)) Print (CStr(aver)) (事件)单击按钮"

文件下载

评论信息

免责申明

【只为小站】的资源来自网友分享,仅供学习研究,请务必在下载后24小时内给予删除,不得用于其他任何用途,否则后果自负。基于互联网的特殊性,【只为小站】 无法对用户传输的作品、信息、内容的权属或合法性、合规性、真实性、科学性、完整权、有效性等进行实质审查;无论 【只为小站】 经营者是否已进行审查,用户均应自行承担因其传输的作品、信息、内容而可能或已经产生的侵权或权属纠纷等法律责任。
本站所有资源不代表本站的观点或立场,基于网友分享,根据中国法律《信息网络传播权保护条例》第二十二条之规定,若资源存在侵权或相关问题请联系本站客服人员,zhiweidada#qq.com,请把#换成@,本站将给予最大的支持与配合,做到及时反馈和处理。关于更多版权及免责申明参见 版权及免责申明