I. Phần trắc nghiệm khách quan (3điểm)
Câu 1: (0.25đ) Các hoạt động nào dưới đây lặp với số lần biết trước:
A. Ngày đánh răng ba lần
B. Mỗi ngày đi học một - hai lần
C. Học cho đến khi thuộc bài
D. Gọi điện cho tới khi có người nhấc máy
Câu 2: (0.25đ) Trong chương trình GeoGebra, nút lệnh nào sau đây dùng để vẽ một đường thẳng đi qua 1 điểm và song song với một đoạn thẳng cho trước?
Trường THCS Thanh Tân GV: Phan Thị Kim Ngân MA TRẬN ĐỀ KIỂM TRA HỌC KÌ II NĂM HỌC 2010-2011 MÔN TIN HỌC 8 NDKT CẤP ĐỘ NHẬN THỨC TỔNG NB TH VDT VDC TN TH Đ TN TH Đ TN TH Đ TN TH Đ Câu lệnh lặp C1 0.25đ C4 C6 0.25đ 0.25đ C10 0.25đ C11 0.25đ 5 1.25đ Học vẽ với phần mềm GeoGebra C2 0.25đ 1 0.25đ Lặp với số lần chưa biết C3 C5 0.25đ 0.25đ C9 C1 0.25đ 3đ C12 0.25đ 5 4đ Làm việc với dãy số C7 C8 0.25đ 0.25đ C2 4đ 3 4.5đ TỔNG 2 0.5đ 6 1.5đ 2 1 3.5đ 2 1 4.5đ 14 10đ 100% 2 / 0.5đ 6 / 1.5đ 3 / 3.5đ 3 / 4.5đ 5% 15% 35% 45% ĐỀ KIỂM TRA HỌC KÌ II NĂM HỌC 2010-2011 MÔN TIN HỌC 8 I. Phần trắc nghiệm khách quan (3điểm) Câu 1: (0.25đ) Các hoạt động nào dưới đây lặp với số lần biết trước: A. Ngày đánh răng ba lần B. Mỗi ngày đi học một - hai lần C. Học cho đến khi thuộc bài D. Gọi điện cho tới khi có người nhấc máy Câu 2: (0.25đ) Trong chương trình GeoGebra, nút lệnh nào sau đây dùng để vẽ một đường thẳng đi qua 1 điểm và song song với một đoạn thẳng cho trước? A. B. C. D. Câu 3: (0.25đ) Vòng lặp while ..do là vòng lặp: A. Biết trước số lần lặp B. Chưa biết trước số lần lặp C. Biết trước số lần lặp nhưng giới hạn là =100 Câu 4: (0.25đ) Khi viết câu lệnh lặp for..to ...do: A. Giá trị đầu bằng giá trị cuối B. Giá trị cuối phải lớn hơn giá trị đầu C. Giá trị đầu lớn hơn giá trị cuối D. Tất cả đều sai. Câu 5: (0.25đ) Câu lệnh lặp while ...do có dạng đúng là: A. While do; B. While do; C. While do ; D. While do ; Câu 6: (0.25đ) Câu lệnh pascal nào sau đây là hợp lệ? A. For i:=100 to 1 do writeln(‘A’); B. For i:=1.5 to 10.5 do writeln(‘A’); C. For i= 1 to 10 do writeln(‘A’); D. For i:= 1 to 10 do writeln(‘A’); Câu 7: (0.25đ) Trong Pascal, các khai báo biến mảng sau đây cách nào đúng? A. Var X: Array [10,13] of integer; B. Var X: Array [1..10] of integer; C. Var X: Array [1, 10] of integer; D. Var X: Array [13 ..10] of integer; Câu 8: (0.25đ) Hãy quan sát câu lệnh khai báo biến mảng sau đây: Var X: Array [1..5] of integer; Phép gán giá trị cho phần tử thứ 2 của mảng X nào dưới đây là đúng? A. X(2) := 8; B. X[2] := 10; C. X{2} := 2; D. X2 := 7; Câu 9 (0.25đ): Đoạn lệnh sau đây x:=1; While x<=10 do x:=x+1; Khi nào thì kết thúc vòng lặp While .. do trên? A. Khi x10 Câu 10: (0.25đ) Dưới đây là một đoạn chương trình Pascal: For i := 0 to 10 do Begin End; Sau khi thực hiện đoạn chương trình trên, giá trị của i là bao nhiêu? A. 0 B. 10 C. 11 D. Không xác định Câu 11: (0.25đ) Cho đoạn chương trình Pascal sau: For i := 1 to 5 do Begin y := i; End; Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu? A. 2 B. 4 C. 5 D. 3 Câu 12 (0.25đ): Đoạn lệnh sau đây so:=1; While so<10 do begin writeln(so); so:=so+1; end; sẽ cho kết quả là gì? A. In ra các số từ 1 đến 9 B. In ra các số từ 1 đến 10 C. In ra vô hạn các số 1, mỗi số trên một dòng D. Không phương án nào đúng II. Phần thực hành (7điểm) Câu 1. (3 đ): Viết chương trình sử dụng lệnh While..do để nhập vào n số tự nhiên cho đến khi nhập vào số 0 thì chương trình ngừng.Lưu chương trình lên đĩa với tên tệp là BT1.PAS. Câu 2. (4 đ): Viết chương trình nhập n số nguyên và đếm xem có bao nhêu số trong dãy là số âm. Lưu chương trình lên đĩa với tên tệp là BT2.PAS. ĐÁP ÁN ĐỀ KIỂM TRA HỌC KÌ II NĂM HỌC 2010-2011 MÔN TIN HỌC 8 I. Phần trắc nghiệm khách quan (3điểm) Mỗi đáp án đúng được 0.25điểm Câu Đáp án Câu Đáp án 1 A 7 B 2 A 8 B 3 B 9 D 4 B 10 B 5 D 11 C 6 D 12 A II. Phần thực hành (7điểm) Câu 1: (3đ) Program Nhap_n_so; (0.25đ) Uses crt; (0.25đ) Var n : real; (0.25đ) Begin Clrscr; (0.25đ) Write(‘hay nhap vao mot so bat ky: ‘); (0.25đ) Readln(n); (0.25đ) While n0 do (1đ) Readln(n); (0. 5đ) Readln; End. Câu 2: (4đ) Program dem_so; (0.25đ) Uses crt; Var dem , i, n: integer; (0.25đ) A: array [1..100] of integer; (0.25đ) Begin Clrscr; dem :=0; (0.25đ) Writeln(‘Nhap so phan tu cu day so: ‘); (0.25đ) Readln(n); (0.25đ) Write(‘hay nhap vao n phan tu: ‘); (0.25đ) For i:= 1 to n do readln(a[i]); (1đ) For i:=1to n do (0.5đ) If a[i]>0 then dem:=dem +1; (0.5đ) Writeln(‘Trong day so co ‘, dem, ‘so am.’) (0.25đ) Readln(n); Readln End.
Tài liệu đính kèm: