資源簡介

臨河三中2021～2022學年上學期期末考試
高二編程試卷
試卷總分：100分 考試時間：70分鐘
姓名 班級 考號
注意事項：1．答卷前，務必將自己的姓名、準考證號等填寫在試卷和答題卡上，并正確粘貼條形碼。
2．選擇題答案用2B鉛筆把答題卡對應題目的答案標號涂黑。非選擇題用0.5毫米黑色字跡筆將答案寫在答題卡指定位置。在試卷上答題無效。
3．考試結束后，只交答題卡，試卷自己保留，以備講評使用。
第Ⅰ卷（共54分）
一、選擇題：本題共27小題，每小題2分，共54分。在每小題給出的四個選項中，只有一項是符合題目要求的。
1. 下列FOR語句格式正確的是（ ）
A、 FOR A= 1 TO 3
……
NEXT B
B、 FOR A= 1 TO 3
……
NEXT
C、 FOR A = 9
……
NEXT A
D、 FOR A= 6 TO 20
2. 下列程序的運行結果是（ ）.
PRIVATE SUB FORM----CLICK（ ）
S=1
FOR I = 1 TO 5
S=S*I
NEXT I
PRINT S，I
END SUB
A. 15 6 B. 120 6 C. 15 5 D. 120 5
3、 A=1：S=0
DO WHILE A>5
S=S+A
A=A+1
LOOP
PRINT S,A
A、0 1 B、 15 6 C、16 5 D、18 6
4、下列程序的運行結果是（ ）
S=6： A=1
DO
A=A+1
S=S+A
LOOP UNTIL A<=8
PRINT S,A
A、18 9 B、25 9 C、8 2 D、41 9
5、下列循環語句不配對的是（ ）
A、FOR —— NEXT B、 DO —— LOOP
C、 DO LOOP—— UNTIL D、 DO —— LOOP UNTIL
6、 S=0
FOR A=5 TO 1
S=S+A
NEXT A
PRINT S
該程序的運行結果是[ ]
A、0 B、 15 C、 6 D、無結果
7. S=5
FOR A=1 TO 5 STEP -1
S=S+A
NEXT A
PRINT S
該程序的運行結果是[ ]
A、5 B、20 C、0 D、無結果
8. A=VAL(INPUTBOX(“ A”))
FOR I= 1 TO 9
M=VAL(INPUTBOX(“M”))
IF A>M THEN A=M
NEXT I
PRINT A
這段程序的功能是（ ）
A．給出9個數中的最大數。 B．給出9個數中的最小數。
C．給出10個數中的最大數。 D．給出10個數中的最小數。
9. S=0
FOR I= 1 TO 100
IF I MOD 2 =0 THEN S=S+I
NEXT I
PRINT S
這段程序的功能是( )
A、求1——100間的奇數和。 B、求1——100間的偶數和。
C、求1——100間的偶數個數。D、求1——100間的奇數個數。
10、以下程序運行后輸出結果為（ ）
DIM Y AS INTEGER，A AS INTEGER
Y=3 ：K=3
DO UNTIL K<9
K=K-2
Y=Y+K
LOOP
PRINT Y;K
A.1 2 B.2 2 C. 3 3 D.2 1
11. S=0 ：N=1
DO WHILE N<=10
S=S+N
LOOP
PRINT S
該程序的運行結果是（ ）。
A、 55 B、 45 C、 65 D、 死循環
12. 下列說法不正確的是( )
A.計時器控件設計時不能改變大小
B.計時器控件運行時不可見
C.計時器控件能響應CLICK事件
D.計時器控件沒有前景色屬性.
13.下列CASE子句不正確的是( )
A. IS >10 B. 2 TO 6
C. “A” TO “E” D. IS >7 AND IS <9
14.下列對象沒有WIDTH和HEIGHT屬性的是( )
A.TIMER1 B. LABEL1 C. TEXT1 D. COMMAND1
15.在窗體上畫一個名稱為Command1的命令按鈕和兩個名稱分別為Text1、Text2的文本框，然后編寫如下事件過程：
??Private Sub Command1_Click()
? n = VAL(Text1.Text)
??Select Case n
??Case 1 To 20
??x = 10
??Case 2, 4, 6
??x = 20
??Case Is < 10
??x = 30
??Case 10
??x = 40
??End Select
??Text2.Text = x
??End Sub
??程序運行后，如果在文本框Text1中輸入10，然后單擊命令按鈕，則在Text2中顯示的內容是 ( )
??A、10 B、20 C、30 D、40
16. 下列程序所計算的數學式子是( )
PRIVATE SUB FORM__CLICK( )
S=0
FOR A= 1 TO 5
S=S+10^A-1
NEXT A
PRINT S
END SUB
A. 10+100+1000+10000+100000 B. 1+11+111+1111+11111
C. 3+33+333+3333+33333 D. 9+99+999+9999+99999
17.下列敘述正確的是( )
A. 單選按鈕被選中時其VALUE的值為1
B. 單選按鈕被選中時其VALUE的值為TRUE
C. 復選框被選中時其VALUE的值為TRUE
D. 復選框被選中時其VALUE的值為0
18.單選按鈕的圖片屬性是( )
A. STYLE B. VALUE C. PICTURE D. ALIGNMENT
19.下列敘述正確的是( )
A. 一個組中同一時刻只能選一個復選框
B. 一個組中同一時刻只能選一個單選按鈕
C. 一個組中同一時刻能選多個單選按鈕
D.復選框不能同時選擇多個.
20.下列程序的功能是( )
PRIVATE SUB FORM_CLICK( )
A=VAL(INPUTBOX(“請輸入第一個數”))
B=VAL(INPUTBOX(“請輸入第二個數”))
C=VAL(INPUTBOX(“請輸入第三個數”))
M=A
IF M>B THEN M=B
IF M>C THEN M=C
PRINT M
END SUB
A.給出三個數中的大數
B.給出三個數中的小數
C.給出三個數中的某個數
21.以下程序段的執行結果是( )
J=1:N=0
Do While N<3
J=J*(J+1)
N=N+1
Loop
Print N;J
A. 1 0 B. 3 3 C. 4 30 D. 3 42
22. S=0: M=0:N=0
FOR I=1 TO 20
IF I MOD 2=0 THEN
S=S+1
ELSEIF I MOD 3 =0 THEN
M=M+1
ELSEIF I MOD 5 =0 THEN
N=N+1
END IF
NEXT I
PRINT S,M,N
這段程序的執行結果是( )
A. 10 4 1 B. 10 3 1 C. 10 5 2 D. 10 3 3
23.下列程序的運行結果是( )
PRIVATE SUB FORM__CLICK( )
S=0
For i= 1 to 5
S=s+i
Next i
PRINT s
END SUB
A. 0 B. 5 C. 15 D. 6
24．下列程序段運行后，輸出結果是（ ）。
a=1
Do Until a>7
a=a*(a+1)
Loop
Print a
A．7 B．39 C．42 D．1
25．閱讀下面程序段：
N1=InputBox(“請輸入第一個數”)
N2=InputBox(“請輸入第二個數”)
Print N1+N2
當輸入分別為 111 和 222 是，程序輸出為（ ）。
A．111222 B． 222 C．333 D．程序錯誤
26.下列程序的運行結果是（ ）
FOR A= 1 TO 100
IF A>9 THEN EXIT FOR
NEXT A
PRINT A
A. 101 B. 9 C. 100 D. 10
27.下列程序的執行結果是（ ）
FOR A= 1 TO 3
PRINT A;
NEXT A
A. 1 1 1 B. 1 2 3 C. 2 2 2 D. 3 3 3
二、填空題（14*1分）
28、根據測試條件的位置，循環分為（ ）型和后測試型循環。
29、根據條件成立是否執行循環體，循環分為當型循環和（ ）型循環。
30、FOR I= 3 TO 19 STEP 4，循環體執行（ ）次
31. 在VB中，三種基本程序結構是（ ）結構，（ ）結構和（ ）結構。
32. 在FOR----NEXT中，步長為正，超過的含義是循環變量的值大于終值 ;步長為負,超過的含義是( )
33. FOR I= 16 TO 3 STEP -3，循環體執行（ ）次
34.. 在FOR--NEXT循環中，循環體的執行次數由（ ），
（ ），（ ）三個因素決定。
35. 在VB程序中，反復被執行的部分叫（ ）
36.第一個單選按鈕的默認名稱是( ),決定單選按鈕方式的屬性是( ).
三、程序填空題（16*2分）
37、輸入10個正整數，找出最大數
PRIVATE SUB FORM CLICK（）
DIM x as integer,y as integer
X=VAL（INPUTBOX（“請輸入數”））
FOR I= 1 TO [1]
y=VAL（INPUTBOX（“請輸入數”））
IF x[3]
PRINT X
END SUB
38、輸入100個學生的成績， 統計大等90的人數，大等80小于90的人數，大等70小于80的人數，大等60小于70的人數，不及格的人數.
PRIVATE SUB FORM CLICK（）
DIM X AS SINGLE
J=0 : B=0: Q=0: L=0: Y=0
FOR I=1 TO [4]
X=VAL（INPUTBOX（“請輸入一個成績”））
SELECT CASE [5]
CASE [6]
J=J+1
CASE IS>=80
B=B+1
CASE IS>=70
Q=Q+1
CASE [7]
L=L+1
CASE [8]
Y=Y+1
[9]
[10]
END SUB
39、輸入一個字符串,倒著輸出.
PRIVATE SUB FORM_CLICK( )
DIM X AS STRING
X=INPUTBOX(“請輸入一個字符串”)
Y=””
FOR I= 1 TO ________________[11]
___________________________[12]
NEXT I
PRINT Y
END SUB
40.輸入45人的VB成績,求出均分.
PRIVATE SUB FORM__CLICK( )
S=0
FOR I= 1 TO __________________[13]
X=VAL(INPUTBOX(“請輸入成績”))
________________________________[14]
NEXT I
PRINT __________[15]
END SUB
41. 求1-100間能被3整除的數的和
PRIVATE SUB FORM_CLICK( )
S=0
FOR I= 1 TO 100
_________________________________【16】
S=S+I
END IF
NEXT I
PRINT I
END SUB
臨河三中2021～2022學年上學期期末考試
高二編程試卷
試卷總分：100分 考試時間：70分鐘
一、選擇題：本題共27小題，每小題2分，共54分。在每小題給出的四個選項中，只有一項是符合題目要求的。
1-5 BBACC 6-10 AADBC 11-15 DCDAA 16-20 DBCBB
21-25 DBCCA 26-27 DB
二、填空（每空1分，共14分）
28. 前測試
29. 直到型
30. 5
31.順序 選擇 循環
32.循環變量的值小于終值
33. 5
34. 初值 終值 步長
35.循環體
36. OPTION1 STYLE
三、程序填空（每空2分，共32分）
37. 9
X=Y
NEXT I
38. 100
X
IS >=90
IS>=60
IS<60 |ELSE
END SELECT
Next i
39. len(x)
Y=mid(x,I,1)+y
40. 45
S=s+x
s/45
41. if I mod 3=0 then

展開更多......

收起↑