A．16 B．8 C．4 D． 32
40.任意输入a，b两个整数，判断a能否被b整除，并输出判断结果。 请在下列9条语句中选取6条拼接成一段完整的程序，实现上述功能。 (注意：每条语句最多使用一次；答题时只要将选取语句的标号按执行先后排列即可)
1．a = Val(InputBox(“请输入a”)): b = Val(InputBox(“请输入b”))
2．If a Mod b <> 0 Then
3．If Int(a / b) = a / b Then 4．If a Mod b = a / b Then
5．If a Mod b = Int(a / b) Then 6．Else 7．End If
8．Print “a不能被b整除！” 9．Print “a能被b整除！”
选取的语句标号序列是____、____、____、____、____、____。
操作题。(共4分)
点击进入VB环境，在代码界面内修改错误代码，并填写运行结果。 注意：请在默认位置以原文件名保存修改后的程序，否则不得分。 41．本程序要求完成的功能是：计算
s?1?234n????? 1?21?2?31?2?3?41?2?3???n的值(结果精确到0.001)。修改程序中仅有的一个错误，并以原文件名保存在默认位置。
程序源代码如下：
Private Sub Command1_Click()
n = Val(InputBox(“请输入n的值”)) ‘以上是输入n值的正确代码，不必作修改 s = 0: t = 1 ‘(1)
For i = 1 To n ‘(2) t = t + i ‘(3) s = s + i / t ‘(4) Next i ‘(5)
‘以下是输出语句的正确代码，也不必作修改 Print Int(s * 1000 + 0.5) / 1000 End Sub
(1) 错误语句的编号是( ___ ) (2分)
(2) 程序运行时输入n值为50，运行结果是__________。(2分)
操作题。(共5分)
点击进入VB环境，在代码界面内编写程序，并填写运行结果。 注意：请在默认位置以原文件名保存，否则不得分。
42．三个连续的三位自然数，最小的数是7的倍数 ，中间的数是9的倍数，最大的数是11的倍数，求这三个连续的自然数。
(1)设最小自然数为x，满足上述条件计算机程序语言的关系表达式是( )。(2分)
A．Int(x/7) = 0 And Int((x + 1)/9) = 0 And Int((x + 2)/11) = 0 B．x Mod 7 = 0 And x + 1 mod 9 = 0 And x + 2 Mod 11 = 0
C．Int(x / 7) = 0 And Int(x + 1 / 9) = 0 And Int(x + 2 / 11) = 0 D．x Mod 7 = 0 And (x + 1) mod 9 = 0 And (x + 2) Mod 11 = 0 (2) 运用VB程序设计语言，求这三个连续的自然数，其中最小自然数x的值是__________。(3分)
2012上海市普通高中学业水平考试《信息科技》试卷五
参 考 答 案
1 2 3 4 5 6 7 8 9 10 0 B A B C A A D C A A 1 C D B C *15 C 555 C B D 2 B D *23 B B B D *28 159 B 3 21 6 C 5 D B T 3 B *40 41 (1) 1 (改s = 0: t = 0) (2) 7.038 42 (1) D (2) 350 *15 384000 *23 总线型 *28 波型 MIDI MIDI *40 1 2 8 6 9 7 或 1 3 9 6 8 7 42参考程序代码(VB): For x = 100 To 997 If x Mod 7 = 0 And (x + 1) Mod 9 = 0 And (x + 2) Mod 11 = 0 Then Print x, x + 1, x + 2 End If Next x
相关推荐：
loading