SỞ GIÁO DỤC VÀ ĐÀO TẠO TRƯỜNG THPT PHAN BỘI CHÂU ĐỀ THI HỌC KÌ II MÔN Tin Hoc 11 Thời gian làm bài:45 phút; (25 câu trắc nghiệm) Họ, tên học sinh: Lớp: Mã đề thi 076 Câu 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 Đ/án Câu 1: Cho đoạn lệnh : St=’Kiem tra tin học 11 hoc ki II’; n:= Pos(‘hoc’,st); Hãy cho biết giá trị của n là bao nhiêu A. 14 B. 22 C. 12 D. 21 Câu 2: Procedure Trao_doi (X: Integer;Y: integer); Var Z: integer; begin Z:=X ;X:=Y; Y:= Z; end; Giả sử A=10, B=20, sau lời gọi thủ thục Trao_doi (A,B) trên có lệnh Writeln(A,B) theo em giá trị nào sẽ được hiển thị trên màn hình A. 20 10 B. 10 20 C. 20 20. D. 10 10 Câu 3: Readln(a); If a = 1 then Writeln(a) else writeln(‘1’); Sau khi máy tính thực hiện đoạn chương trình trên thì: A. trên màn hình không có gì. B. Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1. C. Trên màn hình xuất hiện chữ số 1. D. Trên màn hình xuất hiện chữ số 1 nếu ta nhập vào từ bàn phím số 1 và xuất hiện chữ số khác 1 nếu ta nhập vào chữ số khác 1 từ bàn phím. Câu 4: Cho S1=‘Ha Noi’ và S2= ‘Ha Tinh’. Kết luận nào sau đây là đúng: A. S1>=S2 B. S1<S2 C. S1=S2 D. S1>S2 Câu 5: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng: A. If a=5 then a:=a+1; else a:=a+2; B. If a=b then a:=a+1 else b:=a+2; C. If a=1 then a:=a+1 else a:=a+2 D. If a:=b then a:=a+1; else b=a+2; Câu 6: Cho St1:=’Ha noi dem tro gio’; và St2:=’Ha Noi’; Khi ta gán n:=Pos(St2,St1); thì kết quả của n là: A. 2. B. Một đáp án khác. C. 0. D. 1. Câu 7: Sau khi chạy đoạn chương trình sau, thì sẽ đưa ra màn hình giá trị là bao nhiêu ? a:=2; b:=4; x:=2 ; If a + B >= 6 then x := x + a + b; Write (x); A. 8 B. Cả A, B, C đều sai. C. 2 D. 6 Câu 8: Cho đoạn lệnh : S=’Kiem tra lập trinh tin học 11’; Pos(‘Tin hoc’,st); Hãy cho biết giá trị của hàm pos là bao nhiêu A. 0 B. 20 C. 19 D. Một đáp án khác Câu 9: Chương trình dịch bao gồm: A. Biên dịch B. Chương trình đích . C. Thông dịch. D. Thông dịch và biên dịch. Câu 10: Đoạn chương trình sau đây thực hiện công việc gì? For i:= 1 to Length(st) do If (st[i]>=’0’) and (st[i]<=’9’) then Write(st[i]); A. Đưa ra tất cả các kí tự không phải là các chữ số trong xâu st. B. Đưa ra tất cả các kí tự là các chữ số trong xâu st. C. Là một công việc khác. D. Đưa ra tất cả các kí tự của xâu st. Câu 11: Trong Pascal mở tệp để đọc dữ liệu ra thì ta sử dụng lệnh: A. Rewrite(<tên tệp>); B. Reset(<tên tệp>); C. Rewrite(<tên biến tệp>); D. Reset(<tên biến tệp>); Câu 12: Khái báo mảng một chiều nào sau đây là đúng: A. Type mang=array[1 20] of Integer; Var A: mang; B. Type dayso: array[1 20] of Integer; Var A:dayso C. Type dayso=array[1 20] of Integer; Var dayso:A; D. Var dayso: array[1 20] of Interger; Câu 13: Trong các khai báo sau khai báo nào là khai báo đúng A. Var so_nguyen:byte; B. Var so_nguyen; sothuc: real; C. Var x:Integer, y:byte; D. Var so nguyen:Integer; Trang 1/2 - Mã đề thi 076 Câu 14: Cho đoạn chương trình: Begin z:= x; x: =y; y:= z; End. Đoạn chương trình trên thực hiện việc: A. giá trị x, y không thay đổi, biến z nhận giá trị bằng y. B. giá trị x, y không thay đổi, biến z nhận giá trị bằng x. C. thay đổi giá trị x, y; x nhận giá trị y còn y nhận giá trị z. D. thay đổi giá trị x, y; x nhận giá trị y còn y nhận giá trị x. Câu 15: S: = 0; For i:= 1 to 5 do Begin s:= s + i ; Writeln(s); readln; End; Nhận xét nào đúng nhất về đoạn chương trình trên: A. tính tổng từ 1 đến 5 và in ra trên màn hình các số là tổng của s+i. B. tính tổng từ 1 đến 5 và in ra trên màn hình số tổng s C. đoạn chương trình trên chạy mãi không dừng. D. tính tổng từ 1 đến 5 và in ra trên màn hình lần lượt các số là tổng của s+i. sau mối lần ta ấn phím Enter. Câu 16: Cho đoạn chương trình sau: S:=10; For i:=1 to n do Begin Write('Nhap phan tu thu ',i,': '); Readln(A[i]); end; S:=S+A[i]; Đoạn chương trình trên thức hiện công việc: A. Tính tổng các chỉ số của mảng một chiều B. Tính tổng các phần tử của mảng một chiều. C. Tính tổng các số từ 1 đến n D. Tính tổng của S và A[n] Câu 17: Trong ngôn ngữ lập trình Pascal, đoạn chương trình sau thực hiện việc nào trong các việc : Max:=a[1]; For i:= 2 to n do If max<a[i] then max:=a[i]; A. Không thực hiện việc nào trong 3 việc trên; B. tìm giá trị lớn nhất của mảng A; C. Đếm số phần tử của mảng A; D. Tính tổng các phần tử của mảng một chiều; Câu 18: Procedure Trao_doi (var A: Integer; B: integer); Var C: integer; begin C:=B ; B:=A; A:= C; end; Giả sử x1=50, x2 =100, sau lời gọi thủ thục Trao_doi(x1,x2) trên có lệnh Writeln(A,B) theo em giá trị nào sẽ được hiển thị trên màn hình A. 100 50 B. 50 50. C. 50 100 D. 100 100 Câu 19: Writeln(‘nhap gia tri x lớn hon 100:’); readln(x); While x > 100 do Begin Writeln(‘nhap lai gia tri x:’); readln(x); End; Khi gặp đoạn chương trình trên: A. ta phải nhập giá trị nhỏ hơn hoặc bằng 100 thì chương trình mới chạy tiếp. B. đoạn chương trình trên có lỗi máy tính gặp sẽ chạy mãi không dừng. C. máy tính yêu cầu nhập một giá trị bất kì vào từ bàn phím. D. ta phải nhập giá trị lớn hơn 100 thì chương trình mới chạy tiếp. Câu 20: While 7 >10 do Begin Writeln(‘nhap gia tri x:’); readln(x); End; Đoạn chương trình trên: A. đoạn chương trình bị lỗi không chạy được. B. chạy không thoát ra được. C. không làm gì cả. D. nhập giá trị cho biến x. Câu 21: Trong Pascal, về mặt cú pháp thì câu lệnh nào sau đây là sai? A. i:=100; while i>=1 do Begin s:=s+i; i:=i-1; end; B. For i:=100 downto 1 do If i mod 2 = 0 then s:=s+1; C. For i:=1 to 100 do If i mod 3= 0 then s:=s+1; else n:=n+1; D. For i:=1 to 100 do writeln(i:4); Câu 22: Cho đoạn chương trình sau thực hiện công việc gì? For i:=100 downto 2 do begin If i mod 2 = 0 then Writeln(i); i:=i+1; end; A. viết ra các chữ số không chia hết cho 2 từ 2 đến 100. B. Viết ra tất cả các số chia hết cho 2 từ 2 đến 100. C. Viết ra liên tục các con số 100. D. Không thực hiện được câu lệnh. Câu 23: Cho S1= ‘Xau ki tu.’ và S2= ‘Xau ki tu’. Kết luận nào sau đây là đúng: A. Tất cả đều sai. B. S1=S2 C. S1>S2 D. S1<S2 Câu 24: Writeln(‘ Nhap gia tri x, y, z’); Readln(x,y,z); A. Viết ra dòng chữ: Nhap gia tri x, y, z và con trỏ màn hình được đặt ngay sau chữ z. B. Viết ra dòng chữ: Nhap gia tri x, y, z và đưa con trỏ màn hình xuống dòng dưới dừng chương trình lại đợi nhập giá trị x, y, z. C. Viết ra dòng chữ: Nhap gia tri x, y, z và con trỏ màn hình đặt ngay sau chữ z dừng chương trình lại đợi nhập giá trị x, y, z. Câu 25: For i : = 1 to 10 do begin s: = s + i; i: = i – 1; End; Đoạn chương trình trên; A. chạy mãi không dừng. B. không có tác dụng gì. C. tính tổng từ 1 đến 10. D. bị lỗi, chương trình có đoạn lệnh trên không chạy được. HẾT Trang 2/2 - Mã đề thi 076 . VÀ ĐÀO TẠO TRƯỜNG THPT PHAN BỘI CHÂU ĐỀ THI HỌC KÌ II MÔN Tin Hoc 11 Thời gian làm bài:45 phút; (25 câu trắc nghiệm) Họ, tên học sinh: Lớp: Mã đề thi 076 Câu 1 2 3 4 5 6 7 8 9 10 11 12 13. b:=a+2; C. If a=1 then a:=a+1 else a:=a+2 D. If a:=b then a:=a+1; else b=a+2; Câu 6: Cho St1:=’Ha noi dem tro gio’; và St2:=’Ha Noi’; Khi ta gán n:=Pos(St2,St1); thì kết quả của n là: A. 2. B. Một đáp. so_nguyen; sothuc: real; C. Var x:Integer, y:byte; D. Var so nguyen:Integer; Trang 1/2 - Mã đề thi 076 Câu 14: Cho đoạn chương trình: Begin z:= x; x: =y; y:= z; End. Đoạn chương trình trên thực