vb考试填空vb考填空.docVIP

冉术兵 上传 1、功能：要求输入若干学生的成绩，计算平均分和高于平均分的人数，并将这两个数据放入数组的最后。 2、功能：以下程序的功能如(图1)。 3、功能：以下程序用于判断一个正整数（≥3）是否为素数。 4、功能：下面的程序段，用于实现在一个nXm的矩阵中，找出值最大的元素所在的行和列，并输出其值及行号和列号。 5、功能：以下程序段用于实现矩阵转置，即将一个n×m的矩阵的行和列互换 6、下面过程max()用于求3个数中最大值，利用这个过程求5个数中最大值。 7、功能：以下程序段利用随机函数生成15个10-100之间的整数，然后用选择法将其从小到大排序。 8、功能：下面的程序段用于实现以下功能：利用冒泡法将一组整数从小到大排序 9、功能：以下程序的功能如(图1 10、功能：从键盘输入学生分数，统计学生总人数和各分数段人数，即优秀（90-100）、良好（80-89）、中等（70-79）、及格（60-69）、不及格（60以下）的人数。 11、功能：以下程序段用于实现：输入两个正整数m和n，求其最大公因数和最小公倍数。 12、功能：利用下面的过程求m!和m*n 13、功能：以下程序段用于求∑n! 14、功能：从键盘上输入一串字符，以?结束，统计输入字符中的大、小写字母和数字的个数 15、功能：下面的程序实现：从键盘输入一个数字，将其插入一个有序数组中，插入后的数组仍保持有序。 16、功能：过程suixian可以判断某一个数字是否是水仙花数，利用该过程找出三位数中所有水仙花数。所谓水仙花数是指一个3位数，其各位数字立方和等于该数本身。 17、功能：输入一个数,若大于0,则显示+；若小于0，则显示 -；若等于0,则显示零。 18、功能：以下程序段用于计算数组中各元素的乘积 19、功能：本程序功能为，单击窗体，Form1的输出结果为 20、功能：求表达式s=x/2!+x^3/4!+...+x^(2n-1)/(2n)!的值，并在窗体上输出。 21、功能：写出程序运行后，单击窗体，Form1上显示的内容sum 函数的功能为累加求和 22、功能：程序输出结果为：n=3 x=42 y=9 23、功能：由输入对话框输入n（n必须为大于零且小于30的自然数）， 计算下列表达式的值，并在标签框Label1上显示。 24、功能： 用户单击命令按钮后，程序将文本框Text1中的文本反转显示，同时在文本框Text2中显示文本框Text1中字符串的个数。 25、功能：下面的事件过程判断文本框Text1中输入的数所在区间，并在文本框Text2中输出判断结果 Private Sub Form_Click() ) Private Sub Form_Click() Dim mark() As Integer, i%, n%, aver n = InputBox(输入学生的人数) ReDim mark(1 To n) aver = 0 For i = 1 To n mark(i) = Int(Rnd * 101) aver = aver + mark(i) Next i **********SPACE********** preserve ReDim 【?】 mark(1 To n + 2) 增加两个元素,存放平均分和高于平均分的人数,原来的学生成绩仍保留 mark(n + 1) = aver / n mark(n + 2) = 0 For i = 1 To n **********SPACE********** If mark(i) mark(【?】) Then mark(n + 2) = mark(n + 2) + 1 n+1 Next i For i = 1 To n Print mark(; i; )=; mark(i) Next i Print 平均分=; mark(n + 1), 高于平均分人数=; mark(n + 2) End Sub 2、功能：以下程序的功能如(图1)。 Private Sub Form_Click() Dim a%, b%, c%, d!, x1, x2, p, q, r a = InputBox(请输入a的值) b = InputBox(请输入b的值) c = InputBox(请输入c的值) d = b * b - 4 * a * c p = -b / (2 * a) If d = 0 Then **********SPACE********** If 【?】 Then d0 r = Sqr(d) / (2 * a) x1 = p + r