高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题.docxVIP

PAGE PAGE # / 16 高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题高中信息技术 VB常用的标准函数 浏览题阅览题 会考复习 题 学校: 姓名： 班级： 考号： 评卷人得分、选择题 评卷人 得分 、选择题 ?下列流程图描述的是判断任意 3个正数A、B、C是否能构成勾股数，请按此算法功 能，把流程图填写完整。 /冠人長專H敷Z.C /冠人長專H敷Z.C / /称出?毁“ / C结束） A . Aa2=Ba2+Ca2 or BA2=AA2+CA2 and CA2=AA2+BA2 B . AA2=BA2+CA2 and BA2=AA2+CA2 or CA2=AA2+BA2 C . AA2=BA2+CA2 and BA2=AA2+CA2 and CA2=AA2+BA2 D . AA2=BA2+CA2 or BA2=AA2+CA2 or CA2=AA2+BA2 【答案】D 【解析】 .对输入的两个整数 a和b，找出其中的较大者赋给 c并输出。解决该问题的算法流 程图如右图所示，流程图中虚线框部分的内容可为 /人I /人 I 高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题 【答案】D 【答案】D 【解析】 .下列Visual Basic表达式中计算结果为 4的是（ A. Abs(-4.2)B A. Abs(-4.2) B. Len(a123) C. Sqr(4) D. Int (3.5) 【答案】B 【解析】 4.在 Visual Basic中，有如下程序： Private Sub Comma nd1_Click() Dim a As In teger,b As In teger,c As In teger Dim d As In teger,z As In teger a=Val(Text1 Text):b=Val(Text2.Text):c=Val(Text3.Text) d=max(a,b) z=max(d,c) Text4,Text=Str(d) Text5,Text=Str(z) End Sub Function max（x As In teger,y As In teger） As In teger If xy Then max=x Else max=y End Function 分析该程序段，下列说法正确的是（ ） 该程序中包含了两个自定义函数 在函数max中定义了两个整数型参数 在 textl , text2 , text3中输入数据后程序即被执行 函数max的返回值是字符串类型 【答案】B 高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题 【解析】题目中只包含了一个自定义函数 max (),函数的返回值是integer整数型。 .随机产生15~60之间正整数(包括 15和60)的表达式是( ) Fix(15*Rnd)+60 Int(60*Rnd)+15 Int(46*Rnd)+15 Fix(45*R nd)+15 【答案】C 【解析】Rnd函数的使用方法：1、产生的随机范围内有 X个整数则最终公式中应为： Rnd*X; 2、产生的随机范围从 Y开始则最终公式应为：Rnd+Y。如：产生一个范围在-5~20 之间的随机整数。分析： X为26, Y为-5，所以最终公式为：Int ( Rnd*26-5 )或Int (Rnd*26) -5 .对以下程序段的说法正确的是( ) s=0 i=0 Do While s10 i=i+1 s=s+i*i Loop A .该程序的循环体执行了 3次 B .该程序段结束后i的值为3 该程序段结束后i的值为4 该程序段结束后 s的值为13 【答案】ABD 【解析】 ?有如下一段VB程序。 Private Sub Comma nd1_Click() Dim y As Long Textl.Text = y = f(3) Labell.Caption = Str(y) End Sub 高中信息技术-VB常用的标准函数-浏览题阅览题-会考复习题 Function f(n As In teger) As Long Textl.Text = Textl.Text + Str(n) If n = 1 The n f = 1 Else f = f(n - 1) + 2 End If End Function 程序运行时，单击命令按钮 Command1后，文本框Text1中显示的内容是( ) 1 B. 3 C. 123 D. 321 【答案】D 【解析】 .下列VB表达式的值等于 3的是( )。 Sqr(2) + 1 B. Abs(-1) - 2 C. Asc(1) + 2 D. Len (-2) + 1 【答案】D 【解析】 TOC \o 1