De+DA Tin hoc 11 Ki 2

Trờng THPT Lê Quí Đôn Họ và tên: Lớp: STT: Đề kiểm tra HK2 (45 phút) Năm học: 2011-2012 Môn Tin Học Khối 11 Đề: 001 Điểm 1. Trắc nghiệm (5đ): 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 Câu 1 : Cho khai báo sau : Var a :array[0 16] of integer ; Câu lệnh nào dới đây sẽ in ra tất cả các phần tử của mảng trên ? A. For k:=1 to 16 do write(a[k]); B. For k:=16 downto 0 do write(a[k]); C. For k:=16 downto 0 write(a[k]); D. For k:= 0 to 15 do write(a[k]); Câu 2 : S1 = tin hoc cho moi nguoi Pos(o,S1) cho kết quả là? A. 5 B. 6 C. 7 D. 11 Câu 3 : Đoạn chơng trình sau in ra kết quả nào ? Program Welcome ; Var a : string[10]; Begin a := tinhoc; writeln(length(a)); End. A. 7; B. 6; C. Chơng trình có lỗi; D. 10; Câu 4 : Khai bỏo phn u mt hm l: A. Function <tờn hm> [(<danh sỏch cỏc tham s>)] ; B. Function <tờn hm> ; C. Procedure <tờn hm> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; D. Function <tờn hm> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; Câu 5 : Trong ngôn ngữ lập trình Pascal, đoạn chơng trình sau (kiểu xâu) thực hiện công việc gì ? S1 := ; For i :=1 to length(S) do S1 :=S1 + upcase(S[i]); A. Tạo xâu S1 là chữ in hoa từ xâu S B. Tạo xâu S1 là chữ thờng từ xâu S C. Tạo xâu S1 từ xâu S D. Tạo xâu S1 là các kí tự chữ số Câu 6 : Cỏc bin dựng chung cho ton b chng trỡnh c gi l? A. Tham s thc s. B. Bin cc b. C. Tham s hỡnh thc D. Bin ton cc. Câu 7 : Khng nh no sau õy l ỳng? A. Cỏc th tc (nu cú) phi c khai bỏo ngay t u ca chng trỡnh chớnh. B. Cỏc th tc (nu cú) phi c khai bỏo sau Begin ca chng trỡnh chớnh. C. Cỏc th tc (nu cú) c khai bỏo bt k trong chng trỡnh chớnh. D. Cỏc th tc (nu cú) phi c khai bỏo v mụ t ngay sau phn khai bỏo bin v trc Begin ca chng trỡnh chớnh. Câu 8 : Hãy chọn phơng án ghép đúng. Cho xâu S là Hanoi-Vietnam. Kết quả của hàm Length(S) là A. 12 B. 14 C. 13 D. 15 Câu 9 : Cho str là một xâu kí tự, đoạn chơng trình sau thực hiện công việc gì? for i := length(str) downto 1 do write(str[i]) ; A. In xâu ra màn hình; B. In từng kí tự xâu ra màn hình; C. In từng kí tự ra màn hình theo thứ tự ngợc; D. In từng kí tự ra màn hình theo thứ tự ngợc, trừ kí tự đầu tiên; Câu 10 : Trong ngôn ngữ lập trình Pascal, đoạn chơng trình (mảng một chiều) sau thực hiện công việc gì ? S := 0 ; For i := 1 to n do If (a[i] mod 3 =0) or (a[i] mod 5 = 0) then S :=S+a[i] ; A. Tính tổng các phần tử trong mảng chia hết cho 3 hoặc chia hết cho 5 B. Tính tổng các phần tử chia hết cho 5 C. Tính tổng các phần tử trong mảng GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 1 D. Tính tổng các phần tử chia hết cho 3 Câu 11 : Cho khai báo mảng và đoạn chơng trình nh sau : Var a : array[0 50] of real ; k := 0 ; for i := 1 to 50 do if a[i] > a[k] then k := i ; Đoạn chơng trình trên thực hiện công việc gì dới đây ? A. Tìm chỉ số của phần tử nhỏ nhất trong mảng; B. Tìm phần tử nhỏ nhất trong mảng; C. Tìm chỉ số của phần tử lớn nhất trong mảng; D. Tìm phần tử lớn nhất trong mảng; Câu 12 : Khai bỏo phn u mt th tc l: A. Procedure [(<danh sỏch cỏc tham s>)] : <kiu d liu>; B. Procedure <tờn th tc>: <kiu d liu>; C. Procedure <tờn th tc> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; D. Procedure <tờn th tc> [(<danh sỏch cỏc tham s>)]; Câu 13 : Mảng A dới đây chứa bao nhiêu phần tử ? Const Rows=3 ; Var A:array[0 rows+1] of integer ; A. 5 B. 4 C. 3 D. 6 Câu 14 : Cho x, y l hai bin nguyờn v khai bỏo th tc : Procedure Doicho( Var a:Integer; b:Integer); Var z : Integer; Begin z:=a; a:=b; b:=z; End; Sau khi thc hin cỏc lnh: x:=7; y:=3; Doicho(x, y); thỡ giỏ tr ca x, y l: A. x=7, y=7 B. x=3, y=7 C. x=3, y=3 D. x=7, y=3 Câu 15 : Cho x, y l hai bin nguyờn v khai bỏo th tc : Procedure Doicho( Var a,b:Integer); Var z : Integer; Begin z:=a; a:=b; b:=z; End; Sau khi thc hin cỏc lnh: x:=7; y:=3; Doicho(x, y); thỡ giỏ tr ca x, y l: A. x=7, y=7 B. x=3, y=3 C. x=3, y=7 D. x=7, y=3 Câu 16 : Trong mảng một chiều, đoạn chơng trình sau thực hiện công việc gì ? Dem := 0 ; For i := 1 to n do If a[i] mod 2 = 0 then Dem := Dem + 1 ; A. Đếm các phần tử chia hết cho 2 trong mảng B. Gán giá trị a[i] cho biến S C. Tính tổng các phần tử chia hết cho 2 trong mảng D. Tính tổng các phần tử trong mảng Câu 17 : on chng trỡnh sau a ra mn hỡnh kt qu no: for i:= 1 to 10 do write(i); A. 1 2 3 4 5 6 7 8 9 10 B. a ra 10 cu cỏch C. 10 9 8 7 6 5 4 3 2 1 D. Khụng a ra gỡ c Câu 18 : S1 abcd S2= ghk Insert(S1,S2,1) cho kết quả là ? A. abcdghk B. ghkabcd C. gabcdgha D. aghkbcd Câu 19 : Cỏc bin c khai bỏo cho d liu vo/ra c gi l? A. Bin cc b. B. Tham s thc s. C. Bin ton cc D. Tham s hỡnh thc. Câu 20 : Hãy chọn phơng án ghép đúng nhất. Thủ tục chuẩn Insert(S1,S2,vt) thực hiện GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 2 A. sao chép vào cuối S1 một phần của S2 từ vị trí vt ; B. chèn xâu S1 vào S2 bắt đầu từ vị trí vt ; C. chèn xâu S2 vào S1 bắt đầu từ vị trí vt ; D. nối xâu S2 vào S1; 2. Tự luận (5đ): Em hãy viết chơng trình nhập vào một mảng 1 chiều gồm 10 phần tử và tính tích các phần tử chẵn trong mảng, xuất tích ra màn hình. Bài làm Hết GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 3 Trờng THPT Lê Quí Đôn Họ và tên: Lớp: STT: Đề kiểm tra HK2 (45 phút) Năm học: 2011-2012 Môn Tin Học Khối 11 Đề: 002 Điểm 1. Trắc nghiệm (5đ): 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 Câu 1 : Cho x, y l hai bin nguyờn v khai bỏo th tc : Procedure Doicho( Var a:Integer; b:Integer); Var z : Integer; Begin z:=a; a:=b; b:=z; End; Sau khi thc hin cỏc lnh: x:=7; y:=3; Doicho(x, y); thỡ giỏ tr ca x, y l: A. x=7, y=7 B. x=3, y=7 C. x=3, y=3 D. x=7, y=3 Câu 2 : S1 abcd S2= ghk Insert(S1,S2,1) cho kết quả là ? A. aghkbcd B. ghkabcd C. gabcdgha D. abcdghk Câu 3 : Cho str là một xâu kí tự, đoạn chơng trình sau thực hiện công việc gì? for i := length(str) downto 1 do write(str[i]) ; A. In xâu ra màn hình; B. In từng kí tự ra màn hình theo thứ tự ngợc; C. In từng kí tự xâu ra màn hình; D. In từng kí tự ra màn hình theo thứ tự ngợc, trừ kí tự đầu tiên; Câu 4 : Cho khai báo sau : Var a :array[0 16] of integer ; Câu lệnh nào dới đây sẽ in ra tất cả các phần tử của mảng trên ? A. For k:=16 downto 0 do write(a[k]); B. For k:=16 downto 0 write(a[k]); C. For k:=1 to 16 do write(a[k]); D. For k:= 0 to 15 do write(a[k]); Câu 5 : Mảng A dới đây chứa bao nhiêu phần tử ? Const Rows=3 ; Var A:array[0 rows+1] of integer ; A. 4 B. 3 C. 5 D. 6 Câu 6 : Cỏc bin dựng chung cho ton b chng trỡnh c gi l? A. Bin ton cc. B. Bin cc b. C. Tham s hỡnh thc D. Tham s thc s. Câu 7 : Khng nh no sau õy l ỳng? A. Cỏc th tc (nu cú) phi c khai bỏo sau Begin ca chng trỡnh chớnh. B. Cỏc th tc (nu cú) phi c khai bỏo v mụ t ngay sau phn khai bỏo bin v trc Begin ca chng trỡnh chớnh. C. Cỏc th tc (nu cú) c khai bỏo bt k trong chng trỡnh chớnh. D. Cỏc th tc (nu cú) phi c khai bỏo ngay t u ca chng trỡnh chớnh. Câu 8 : Hãy chọn phơng án ghép đúng. Cho xâu S là Hanoi-Vietnam. Kết quả của hàm Length(S) là A. 12 B. 13 C. 15 D. 14 Câu 9 : Khai bỏo phn u mt hm l: A. Function <tờn hm> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; B. Function <tờn hm> ; C. Function <tờn hm> [(<danh sỏch cỏc tham s>)] ; D. Procedure <tờn hm> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; Câu 10 : Đoạn chơng trình sau in ra kết quả nào ? Program Welcome ; GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 4 Var a : string[10]; Begin a := tinhoc; writeln(length(a)); End. A. 6; B. Chơng trình có lỗi; C. 7; D. 10; Câu 11 : S1 = tin hoc cho moi nguoi Pos(o,S1) cho kết quả là? A. 6 B. 7 C. 5 D. 11 Câu 12 : Trong ngôn ngữ lập trình Pascal, đoạn chơng trình (mảng một chiều) sau thực hiện công việc gì ? S := 0 ; For i := 1 to n do If (a[i] mod 3 =0) or (a[i] mod 5 = 0) then S :=S+a[i] ; A. Tính tổng các phần tử chia hết cho 5 B. Tính tổng các phần tử trong mảng chia hết cho 3 hoặc chia hết cho 5 C. Tính tổng các phần tử chia hết cho 3 D. Tính tổng các phần tử trong mảng Câu 13 : Cho khai báo mảng và đoạn chơng trình nh sau : Var a : array[0 50] of real ; k := 0 ; for i := 1 to 50 do if a[i] > a[k] then k := i ; Đoạn chơng trình trên thực hiện công việc gì dới đây ? A. Tìm chỉ số của phần tử nhỏ nhất trong mảng; B. Tìm chỉ số của phần tử lớn nhất trong mảng; C. Tìm phần tử lớn nhất trong mảng; D. Tìm phần tử nhỏ nhất trong mảng; Câu 14 : Cho x, y l hai bin nguyờn v khai bỏo th tc : Procedure Doicho( Var a,b:Integer); Var z : Integer; Begin z:=a; a:=b; b:=z; End; Sau khi thc hin cỏc lnh: x:=7; y:=3; Doicho(x, y); thỡ giỏ tr ca x, y l: A. x=7, y=7 B. x=7, y=3 C. x=3, y=7 D. x=3, y=3 Câu 15 : on chng trỡnh sau a ra mn hỡnh kt qu no: for i:= 1 to 10 do write(i); A. a ra 10 cu cỏch B. 10 9 8 7 6 5 4 3 2 1 C. Khụng a ra gỡ c D. 1 2 3 4 5 6 7 8 9 10 Câu 16 : Khai bỏo phn u mt th tc l: A. Procedure <tờn th tc> [(<danh sỏch cỏc tham s>)] : <kiu d liu>; B. Procedure <tờn th tc>: <kiu d liu>; C. Procedure <tờn th tc> [(<danh sỏch cỏc tham s>)]; D. Procedure [(<danh sỏch cỏc tham s>)] : <kiu d liu>; Câu 17 : Cỏc bin c khai bỏo cho d liu vo/ra c gi l? A. Bin cc b. B. Bin ton cc C. Tham s thc s. D. Tham s hỡnh thc. Câu 18 : Trong mảng một chiều, đoạn chơng trình sau thực hiện công việc gì ? Dem := 0 ; For i := 1 to n do If a[i] mod 2 = 0 then Dem := Dem + 1 ; A. Tính tổng các phần tử chia hết cho 2 trong mảng B. Gán giá trị a[i] cho biến S C. Tính tổng các phần tử trong mảng D. Đếm các phần tử chia hết cho 2 trong mảng Câu 19 : Trong ngôn ngữ lập trình Pascal, đoạn chơng trình sau (kiểu xâu) thực hiện công việc gì ? S1 := ; For i :=1 to length(S) do S1 :=S1 + upcase(S[i]); A. Tạo xâu S1 là chữ in hoa từ xâu S B. Tạo xâu S1 là chữ thờng từ xâu S C. Tạo xâu S1 là các kí tự chữ số D. Tạo xâu S1 từ xâu S Câu 20 : Hãy chọn phơng án ghép đúng nhất. Thủ tục chuẩn Insert(S1,S2,vt) thực hiện GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 5 A. sao chép vào cuối S1 một phần của S2 từ vị trí vt ; B. chèn xâu S2 vào S1 bắt đầu từ vị trí vt ; C. nối xâu S2 vào S1; D. chèn xâu S1 vào S2 bắt đầu từ vị trí vt ; 2. Tự luận (5đ): Em hãy viết chơng trình nhập vào một mảng 1 chiều gồm 10 phần tử và tính tổng các phần tử lẻ trong mảng, xuất tổng ra màn hình. Bài làm Hết GV: Đinh Thị Minh Hiếu Năm học:2010-2011 trang 6 §¸p An §Ò kiÓm tra HK2 (45 phót) m«n Tin Häc Khèi 11 001 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 002 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 GV: §inh ThÞ Minh HiÕu N¨m häc:2010-2011 trang 7 . Năm học :20 10 -2 011 trang 3 Trờng THPT Lê Quí Đôn Họ và tên: Lớp: STT: Đề ki m tra HK2 (45 phút) Năm học: 2 011- 20 12 Môn Tin Học Khối 11 Đề: 0 02 Điểm 1. Trắc nghiệm (5đ): 01 06 11 16 02 07 12 17 03. Minh Hiếu Năm học :20 10 -2 011 trang 6 §¸p An §Ò ki m tra HK2 (45 phót) m«n Tin Häc Khèi 11 001 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 0 02 01 06 11 16 02 07 12 17 03 08 13 18 04. tên: Lớp: STT: Đề ki m tra HK2 (45 phút) Năm học: 2 011- 20 12 Môn Tin Học Khối 11 Đề: 001 Điểm 1. Trắc nghiệm (5đ): 01 06 11 16 02 07 12 17 03 08 13 18 04 09 14 19 05 10 15 20 Câu 1 : Cho khai