命题比赛-算法与程序设计题(新)

1、算法与程序设计题选择题1、面是某幼儿圆小朋友晨检过程的部分算法描述，则图中虚线部分应填入(A2、健康？N第一题图第一题中的算法采用的描述方法属于A. 自然语言B.流程图(C.伪代码D. 计算机语言)C.循环结构D.树型结构3、第一题中，算法描述的结构属于(顺序结构B.选择结构4、在 VB 窗体中有一个对象，该对象的属性窗口如图所示。下列说法中不正确的是( )A Interval 为属性名C.该对象的名称为 Timer11680 为属性值D.根据“ Timer1 Timer ”可判断窗体名为 Timer5、已知 i=11 ， j=3 ，执行 i=int(-8.6)+ij+15/3 mod 5 后

2、，i 的值是 ( )A.-6 B.-5 C.-1 D.06、下列各赋值语句，语法错误的是()A. abs(x)=5B. number=15C. Label1.caption=Time D.sLength=len(mystring)7、某高校的学籍管理软件中有 2 万个学生的电子档案 （已按学籍号排序） ，假设从中取出一 条记录并与待查项进行比较所花时间为 8 毫秒，则用对分法在该系统中查找任意一位学生档 案最多花费的时间约为： （ ）A.16 万毫秒 B.8 万毫秒 C.10 毫秒 D.120 毫秒8、下面程序模块的功能是在 128 个数中顺序查找数据 k，找到第一个就将数组元素下标记 录到变

3、量 pos中，并结束查找。若将语句 Exit For 去掉，其功能跟原来有什么区别（）Function search（k As Integer） As IntegerDim pos As IntegerFor i=1 to 128nc=nc+1if d（i）=k Then pos=i: Exit ForNext iSearch=posEnd FunctionA. 没有区别B.变成 pos中记录的是找到的最后一个符合条件的数组元素下标查找将一直进行下去，不会结束 D.变成将所有符合条件的数据都找出来并记录下来二 程序设计题1、有如下 Visual Basic 程序段： a = 13b = 6c

4、= ab+bc = a-c该程序段运行后，变量c 的值为 2、有如下 Visual Basic 程序段：Private sub Command1_Click( ) a=10+Rnd*90 if a=10 thenb= ”大于等于 10”elseif a100 thenb= ”小于 100 ”End ifText1.Text=bEnd Sub该程序段运行后，单击命令按钮，文本框 Text1 中显示的是3、下列 VB程序运行时，单击命令按钮，在文本框Text1 中显示的内容是 Text2 中显示的内容是 。Private Sub Command1_Click()Dim a(1 To 5) As I

5、ntegerDim x AS IntegerFor i=1 to 5a(i)=iNext ii=1Do While x=10 thenb= ”大于等于 10” elseif a100 thenb= ”小于 100 ” End if Text1.Text=b End Sub4分（1） 计算结果为 “大于等于 10 ”得 4分（2） 计算结果为 ”小于 100”为 0 分（3） 其它情况为 0 分3、下列 VB程序运行时，单击命令按钮， 在文本框 Text1 中显示的 内容是6分Text2 中显示的内容是 Private Sub Command1_Click()Dim a(1 To 5) As I

6、ntegerDim x AS IntegerFor i=1 to 5 a(i)=iNext ii=1Do While x3 a(i)=a(i)*x x=x+2 i=i+1LoopText1.Text=Str(a(1)Text2.text=Str(a(2)End Sub1)Text1 中显示的内容为 0得 3 分2)Text2 中显示的内容为 4得 3 分其它情况为 0 分8分(1) 程 序 中 划 线 处 填 入 “ y=j*10+i ” 得 4 分(3) 程 序 中 更 正 为 Text2.text=str(y) 得 4 分(4) 其它情况为 0 分4、以下 Visual Basic 程序的功能是：在 文本框 Text1 中输入一个两位数 x，将个 位上的数和十位上的数互换组合成新的 两位数 y ，并在文本框 Text2 中输出新数。 Private Sub Command1_Click() Dim x As Integer, y As Integer Dim i As Integer, j As Integer x