DE KT 1TIET KHOI 11THAM KHAO

TRƯỜNG THPT NGUYỄN BỈNH KHIÊM KIỂM TRA 1TIẾT - KHỐI 11 TỔ: TOÁN - TIN MÔN: TIN HỌC (45 PHÚT) MÃ ĐỀ: 001 Họ và tên: .Lớp . I. Phần trắc nghiệm đơn tuyển (5.0 điểm): Câu 1: Phát biểu nào sau đây về kiểu bản ghi là sai? A. Tham chiếu trường của bản ghi: tên biến bản ghi.tên trường. B. Trong một biến bản ghi có thể có nhiều kiểu dữ liệu khác nhau. C. Trong pascal để khai báo biến bản ghi ta sử dụng từ khoá TYPE. D. Để định nghĩa kiểu bản ghi ta sử dụng cặp từ kháo RECORD và END. Câu 2: ãy chọn phát biểu sai trong các phát biểu sau: A. Program là một từ khoá. B. Program là một tên chuẩn. C. Program là một tên dành ri êng. D. Program dùng để khai báo tên chương trình. Câu 3:Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Const columns = 7; rows = 7; Var table: array[0 columns-1, 1 rows] of integer; Số phần tử của mảng table là: A. 42 B. 56 C. 36 D. 49 Câu 4: Cho xâu S1=’Vinh - Ha - Long’. Em hãy cho biết giá trị của S2:= Copy(S1,6,4). A. ‘ Ha ’. B. ‘- Ha’. C. ‘Ha -‘. D. ‘-Ha-‘. C âu 5: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Var a: array[1 50] of integer; b, c: array[1 50] of integer; Trong phần thân của chương trình có đoạn khai báo trên thì câu lệnh gán nào sau đây là đúng? A. tất cả đều đúng; B. b:=c; C. a:=b; D. a:=c; Câu 6: Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là đúng? A. Var mang : string[55]; B. Var mang = string[55]; C. Type mang : string[55]; D. Type mang = string[55]; Câu 7: Trong ngôn ngữ lập trình Pascal, Giả sử đã khai báo biến mảng và các biến khác, đoạn chương trình sau đây làm gì ( n là số phần tửc của mảng)? For i:=1 to n do Begin Write(i); Writeln; End; A. Hiện lên màn hình giá trị của các phần tử của mảng ; B. Đếm số phần tử của mảng ; C. Hiện lên màn hình giá trị của mảng; D. Nhập giá trị cho các phần tử của mảng ; Câu 8: Phát biểu nào sau đây về kiểu dữ liệu xâu là đúng? A. Xâu là dãy kí tự trong bộ mã ASCII và các kí tự đặc biệt. B. Xâu là dãy kí tự trong bộ mã ASCII. C. Trong một biến xâu có thể chứa nhiều kiểu dữ liệu khác nhau. D. X âu là một dãy hữu hạn các số nguyên và số thực. Câu 9: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var m: array[1 10] of Integer; i, t : integer ; begin t:= 0; for i:=1 to 10 do if i mod 2 <> 0 then t:= t+i ; End. Sau khi thực hiện xong chương trình trên, giá trị của t sẽ là: A. 30 B. 55 C. 25 D. 9 C âu 10: Hãy chọn đáp án đúng trong các phát biểu sau?. A. Type bien1: String; B. Type bien1: array[1 100] of real; C. Type 1bien= array[1 2,1 2] of integer; D. Tất cả đều sai. II. Phần đọc hiểu (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var S1, S2, S3: String; D, M,N, i: byte; Begin S1:=‘Nguyen-Binh-Khiem - daklak’; S2:=‘’; D:=lenght(S2)+ length(s2); Insert(S2, S1,3); M:= Pos(‘b’,S1); N:=length(S1); S3:=Upcase(S2); End. Em hãy xác định giá trị của các biến S1, S3, D, M, N sau khi thực hiện xong đoạn chương trình trên. Biến S1 S3 D M N Giá trị C âu 2: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var A,B,C : array[1 2,1 2] of integer; TA, TB,TC, i, j: integer; Begin TA:=0; TB:=0; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘A[‘,i,’,’,j,’] =’); Readnl(A[i,j]); TA:= TA+ A[i,j]; End; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘B[‘,i,’,’j,’] =’); Readnl(B[i,j]); TB:=TB+ B[i,j]; End; For i:=1 to 2 do For j:=1 to 2 do Begin C[i,j]:= A[i,j]+B[i,j]; TC:= C[1,1]; IF C[i,j] > TC then TC:= C[i,j]; End; End. Cho các giá trị A[1,1]=7, A[1,2]=16, A[2,1]=11, A[2,2]=9, B[1,1]=13, B[1,2]=9, B[2,1]=19, B[2,2]=6. Em hãy xác định giá trị của các phần tử của mảng C và biến TA, TB, TC sau khi thực hiện xong đoạn chương trình trên. Biến Giá trị c ác phần tử mảng C TA TB TC C[1,1] C[1,2] C[2,1] C[2,2] Giá trị TRƯỜNG THPT NGUYỄN BỈNH KHIÊM KIỂM TRA 1TIẾT - KHỐI 11 TỔ: TOÁN - TIN MÔN: TIN HỌC (45 PHÚT) MÃ ĐỀ: 002 Họ và tên: Lớp I. Phần trắc nghiệm đơn tuyển (5.0 điểm): Câu 1: Cho xâu S1=’Vinh - Ha - Long’. Em hãy cho biết giá trị của S2:= Copy(S1,6,4). A. ‘- Ha’. B. ‘ Ha ’. C. ‘Ha -‘. D. ‘-Ha-‘. Câu 2: Phát biểu nào sau đây về kiểu dữ liệu xâu là đúng? A. Xâu là dãy kí tự trong bộ mã ASCII và các kí tự đặc biệt. B. X âu là một dãy hữu hạn các số nguyên và số thực. C. Trong một biến xâu có thể chứa nhiều kiểu dữ liệu khác nhau. D. Xâu là dãy kí tự trong bộ mã ASCII. Câu 3: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var m: array[1 10] of Integer; i, t : integer ; begin t:= 0; for i:=1 to 10 do if i mod 2 <> 0 then t:= t+i ; End. Sau khi thực hiện xong chương trình trên, giá trị của t sẽ là: A. 25 B. 55 C. 9 D. 30 Câu 4: Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là đúng? A. Type mang : string[55]; B. Type mang = string[55]; C. Var mang : string[55]; D. Var mang = string[55]; C âu 5: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Var a: array[1 50] of integer; b, c: array[1 50] of integer; Trong phần thân của chương trình có đoạn khai báo trên thì câu lệnh gán nào sau đây là đúng? A. b:=c; B. a:=b; C. tất cả đều đúng; D. a:=c; Câu 6: Trong ngôn ngữ lập trình Pascal, Giả sử đã khai báo biến mảng và các biến khác, đoạn chương trình sau đây làm gì ( n là số phần tửc của mảng)? For i:=1 to n do Begin Write(i); Writeln; End; A. Hiện lên màn hình giá trị của các phần tử của mảng ; B. Hiện lên màn hình giá trị của mảng; C. Nhập giá trị cho các phần tử của mảng ; D. Đếm số phần tử của mảng ; Câu 7: Phát biểu nào sau đây về kiểu bản ghi là sai? A. Trong một biến bản ghi có thể có nhiều kiểu dữ liệu khác nhau. B. Trong pascal để khai báo biến bản ghi ta sử dụng từ khoá TYPE. C. Tham chiếu trường của bản ghi: tên biến bản ghi.tên trường. D. Để định nghĩa kiểu bản ghi ta sử dụng cặp từ kháo RECORD và END. C âu 8: Hãy chọn đáp án đúng trong các phát biểu sau?. A. Tất cả đều sai. B. Type bien1: array[1 100] of real; C. Type 1bien= array[1 2,1 2] of integer; D. Type bien1: String; Câu 9: Hãy chọn phát biểu sai trong các phát biểu sau: A. Program là một từ khoá. B. Program là một tên chuẩn. C. Program là một tên dành ri êng. D. Program dùng để khai báo tên chương trình. Câu 10: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Const columns = 7; rows = 7; Var table: array[0 columns-1, 1 rows] of integer; Số phần tử của mảng table là: A. 56 B. 49 C. 36 D. 42 II. Phần đọc hiểu (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var S1, S2, S3: String; D, K, M , i: byte; Begin S1:=‘Ha Noi - Viet Nam’; S2:=‘ Thu Do’ D:=lenght(S2)+ length(s2); Insert(S2, S1,6); K:= Pos(‘v’,S1); M:=length(S1); For i:=1 to length(S2) do S3[i]:=Upcase(S2[i]); End. Em hãy xác định giá trị của các biến S1, S3, L, K, Kt sau khi thực hiện xong đoạn chương trình trên. Biến S1 S3 D K M Giá trị C âu 2: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var A,B,C : array[1 2,1 2] of integer; TA, TB,TC, i, j: integer; Begin TA:=0; TB:=0; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘A[‘,i,’,’,j,’] =’); Readnl(A[i,j]); TA:= TA+ A[i,j]; End; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘B[‘,i,’,’j,’] =’); Readnl(B[i,j]); TB:=TB+ B[i,j]; End; For i:=1 to 2 do For j:=1 to 2 do Begin C[i,j]:= A[i,j]+B[i,j]; TC:= C[1,1]; IF C[i,j] < TC then TC:= C[i,j]; End; End. Cho các giá trị A[1,1]=22, A[1,2]=6, A[2,1]=13, A[2,2]=16, B[1,1]=3, B[1,2]=14, B[2,1]=7, B[2,2]=4. Em hãy xác định giá trị của các phần tử của mảng C và biến TA, TB, TC sau khi thực hiện xong đoạn chương trình trên. Biến Giá trị c ác phần tử mảng C TA TB TC C[1,1] C[1,2] C[2,1] C[2,2] Giá trị TRƯỜNG THPT NGUYỄN BỈNH KHIÊM KIỂM TRA 1 TÍÊT - KHỐI 11 TỔ: TOÁN - TIN MÔN: TIN HỌC (45 PHÚT) MÃ ĐỀ: 003 Họ và tên: .Lớp . I. Phần trắc nghiệm đơn tuyển (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là đúng? A. Var mang = string[55]; B. Type mang : string[55]; C. Var mang : string[55]; D. Type mang = string[55]; Câu 2: Phát biểu nào sau đây về kiểu bản ghi là sai? A. Để định nghĩa kiểu bản ghi ta sử dụng cặp từ kháo RECORD và END. B. Trong một biến bản ghi có thể có nhiều kiểu dữ liệu khác nhau. C. Tham chiếu trường của bản ghi: tên biến bản ghi.tên trường. D. Trong pascal để khai báo biến bản ghi ta sử dụng từ khoá TYPE. C âu 3: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Var a: array[0 50] of integer; b, c: array[1 50] of integer; Trong phần thân của chương trình có đoạn khai báo trên thì câu lệnh gán nào sau đây là đúng? A. a:=b; B. b:=c; C. tất cả đều đúng; D. a:=c; Câu 4: Hãy chọn phát biểu sai trong các phát biểu sau: A. Program là một tên chuẩn. B. Program là một tên dành ri êng. C. Program dùng để khai báo tên chương trình. D. Program là một từ khoá. Câu 5: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Const columns = 7; rows = 7; Var table: array[0 columns-1, 1 rows] of integer; Số phần tử của mảng table là: A. 42 B. 49 C. 36 D. 56 Câu 6: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var m: array[1 10] of Integer; i, t : integer ; begin t:= 0; for i:=1 to 10 do if i mod 2 <> 0 then t:= t+i ; End. Sau khi thực hiện xong chương trình trên, giá trị của t sẽ là: A. 9 B. 25 C. 55 D. 30 Câu 7: Trong ngôn ngữ lập trình Pascal, Giả sử đã khai báo biến mảng và các biến khác, đoạn chương trình sau đây làm gì ( n là số phần tửc của mảng)? For i:=1 to n do Begin Write(i); Writeln; End; A. Đếm số phần tử của mảng ; B. Hiện lên màn hình giá trị của các phần tử của mảng ; C. Hiện lên màn hình giá trị của mảng; D. Nhập giá trị cho các phần tử của mảng ; C âu 8: Hãy chọn đáp án đúng trong các phát biểu sau?. A. Type bien1: String; B. Tất cả đều sai. C. Type 1bien= array[1 2,1 2] of integer; D. Type bien1: array[1 100] of real;; Câu 9: Phát biểu nào sau đây về kiểu dữ liệu xâu là đúng? A. Xâu là dãy kí tự trong bộ mã ASCII và các kí tự đặc biệt. B. X âu là một dãy hữu hạn các số nguyên và số thực. C. Trong một biến xâu có thể chứa nhiều kiểu dữ liệu khác nhau. D. Xâu là dãy kí tự trong bộ mã ASCII. Câu 10: Cho xâu S1=’Vinh - Ha - Long’. Em hãy cho biết giá trị của S2:= Copy(S1,6,4). A. ‘Ha -‘. B. ‘-Ha-‘ C. ‘ Ha ’. D. ‘- Ha’. II. Phần đọc hiểu (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var S1, S2, S3: String; D, B, C, i: byte; Begin S1:=‘Truong - Nguyen Binh Khiem’; S2:=‘thpt ’ D:=lenght(S1)+ length(s2); Insert(S2, S1,7); B:= Pos(‘y’,S1); C:=length(S1); For i:=1 to length(S2) do S3[i]:=Upcase(S2[i]); End. Em hãy xác định giá trị của các biến S1, S3, L, K, Kt sau khi thực hiện xong đoạn chương trình trên. Biến S1 S3 D B C Giá trị C âu 2: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var A,B,C : array[1 2,1 2] of integer; TA, TB,TC, i, j: integer; Begin TA:=0; TB:=0; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘A[‘,i,’,’,j,’] =’); Readnl(A[i,j]); TA:= TA+ A[i,j]; End; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘B[‘,i,’,’j,’] =’); Readnl(B[i,j]); TB:=TB+ B[i,j]; End; For i:=1 to 2 do For j:=1 to 2 do Begin C[i,j]:= A[i,j]+B[i,j]; TC:= 1; IF C[i,j] mod 2<> 0 then TC:=TC+ C[i,j]; End; End. Cho các giá trị A[1,1]=4, A[1,2]=18, A[2,1]=12, A[2,2]=14, B[1,1]=21, B[1,2]=14, B[2,1]=8, B[2,2]=11. Em hãy xác định giá trị của các phần tử của mảng C và biến TA, TB, TC sau khi thực hiện xong đoạn chương trình trên. Biến Giá trị c ác phần tử mảng C TA TB TC C[1,1] C[1,2] C[2,1] C[2,2] Giá trị TRƯỜNG THPT NGUYỄN BỈNH KHIÊM KIỂM TRA 1 TIẾT - KHỐI 11 TỔ: TOÁN - TIN MÔN: TIN HỌC (45 PHÚT) MÃ ĐỀ: 004 Họ và tên: .Lớp . I. Phần trắc nghiệm đơn tuyển (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var m: array[1 10] of Integer; i, t : integer ; begin t:= 0; for i:=1 to 10 do if i mod 2 <> 0 then t:= t+i ; End. Sau khi thực hiện xong chương trình trên, giá trị của t sẽ là: A. 30 B. 9 C. 55 D. 25 Câu 2: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Const columns = 7; rows = 7; Var table: array[0 columns-1, 1 rows] of integer; Số phần tử của mảng table là: A. 42 B. 56 C. 49 D. 36 C âu 3: Trong ngôn ngữ lập trình Pascal, Cho đoạn khai báo sau: Var a: array[0 50] of integer; b, c: array[1 50] of integer; Trong phần thân của chương trình có đoạn khai báo trên thì câu lệnh gán nào sau đây là đúng? A. b:=c; B. tất cả đều đúng; C. a:=b; D. a:=c; Câu 4: Trong ngôn ngữ lập trình Pascal, về mặt cú pháp câu lệnh nào sau đây là đúng? A. Type mang = string[55]; B. Var mang = string[55]; C. Type mang : string[55]; D. Var mang : string[55]; Câu 5: Trong ngôn ngữ lập trình Pascal, Giả sử đã khai báo biến mảng và các biến khác, đoạn chương trình sau đây làm gì ( n là số phần tửc của mảng)? For i:=1 to n do Begin Write(i); Writeln; End; A. Đếm số phần tử của mảng ; B. Hiện lên màn hình giá trị của các phần tử của mảng ; C. Hiện lên màn hình giá trị của mảng; D. Nhập giá trị cho các phần tử của mảng ; Câu 6: Phát biểu nào sau đây về kiểu dữ liệu xâu là đúng? A. Xâu là dãy kí tự trong bộ mã ASCII. B. Xâu là dãy kí tự trong bộ mã ASCII và các kí tự đặc biệt. C. Trong một biến xâu có thể chứa nhiều kiểu dữ liệu khác nhau. D. X âu là một dãy hữu hạn các số nguyên và số thực. Câu 7: Phát biểu nào sau đây về kiểu bản ghi là sai? A. Tham chiếu trường của bản ghi: tên biến bản ghi.tên trường. B. Trong pascal để khai báo biến bản ghi ta sử dụng từ khoá TYPE. C. Trong một biến bản ghi có thể có nhiều kiểu dữ liệu khác nhau. D. Để định nghĩa kiểu bản ghi ta sử dụng cặp từ kháo RECORD và END. Câu 8: Cho xâu S1=’Vinh - Ha - Long’. Em hãy cho biết giá trị của S2:= Copy(S1,6,4). A. ‘ Ha ’. B. ‘-Ha-‘. C. ‘Ha -‘. D. ‘- Ha’. C âu 9: Hãy chọn đáp án đúng trong các phát biểu sau?. A. Type bien1: String; B. Type bien1: array[1 100] of real; C. Tất cả đều sai. D. Type 1bien= array[1 2,1 2] of integer; Câu 10: Hãy chọn phát biểu sai trong các phát biểu sau: A. Program là một từ khoá. B. Program là một tên chuẩn. C. Program là một tên dành ri êng. D. Program dùng để khai báo tên chương trình. II. Phần đọc hiểu (5.0 điểm): Câu 1: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var S1, S2, S3: String; D, K, M, i: byte; Begin S1:=‘’; S2:=‘DakLak – Viet Nam’; D:=lenght(S1)+ length(s2); Insert(S1, S2,3); K:= Pos(‘-’,S2); M:=length(S2); For i:=1 to length(S2) do S3[i]:=Upcase(S2[i]); End. Em hãy xác định giá trị của các biến S1, S3, L, K, Kt sau khi thực hiện xong đoạn chương trình trên. Biến S2 S3 D K M Giá trị C âu 2: Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình sau: Var A,B,C : array[1 2,1 2] of integer; TA, TB,TC, i, j: integer; Begin TA:=0; TB:=0; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘A[‘,i,’,’,j,’] =’); Readnl(A[i,j]); TA:= TA+ A[i,j]; End; For i:= 1 to 2 do For j:= 1 to 2 do Be gin Writer(‘B[‘,i,’,’j,’] =’); Readnl(B[i,j]); TB:=TB+ B[i,j]; End; For i:=1 to 2 do For j:=1 to 2 do Begin C[i,j]:= A[i,j]+B[i,j]; TC:= 1; IF C[i,j] mod 2 = 0 then TC:= TC+C[i,j]; End; End. Cho các giá trị A[1,1]=12, A[1,2]=8, A[2,1]=15, A[2,2]=7, B[1,1]=8, B[1,2]=22, B[2,1]=5, B[2,2]=13. Em hãy xác định giá trị của các phần tử của mảng C và biến TA, TB, TC sau khi thực hiện xong đoạn chương trình trên. Biến Giá trị các phần tử mảng C TA TB TC C[1,1] C[1,2] C[2,1] C[2,2] Giá trị . S3[i]:=Upcase(S2[i]); End. Em hãy xác định giá trị của các biến S1, S3, L, K, Kt sau khi thực hiện xong đoạn chương trình trên. Biến S1 S3 D K M Giá trị C. S3[i]:=Upcase(S2[i]); End. Em hãy xác định giá trị của các biến S1, S3, L, K, Kt sau khi thực hiện xong đoạn chương trình trên. Biến S1 S3 D B C Giá trị C