KIỂM TRA HKII NĂM HỌC 2010 -2011 Môn : Tin học 8 I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3 đ ) - Thời gian làm bài 10 phút Thí sinh chọn chữ cái chỉ kết quả mà em chọn là đúng và ghi vào tờ giấy làm bài. Câu 1: Em hiểu câu lệnh lặp theo nghĩa nào dưới đây? a. Một lệnh thay cho nhiều lệnh. b. Các câu lệnh được viết lặp đi lặp lai nhiều lần. c. Vì câu lệnh đã có tên là lệnh lặp d. Cả a, b, c đều sai. Câu 2: Cách viết câu lệnh lặp với số lần biết trước như sau: a. For <biến đếm> = <giá trị đầu> to <giá trị cuối> do <câu lệnh>; b. For <biến đếm>: = <gía trị cuối> to <giá trị đầu> do <câu lệnh>; c. For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>; d. For <biến đếm> = <giá trị cuối> to <giá trị đầu> do <câu lệnh> Câu 3: cho đoạn chương trình sau: I:=1; While i<=5 do Begin tong:= tong + I; I:= I + 1; End; Sau đoạn chương trình trên em hãy cho biết biến “tong” có giá trị bằng bao nhiêu? A.1 B.5 C.10 D.15 Câu 4.Để khai báo biến mảng a gồm 10 phần tử , mỗi phần tử có kiểu dữ liệu là real ta khai báo: A. var a: array[10] of real; B. var a: array[1;10] of real; C. var a: array[1:10]: of real; D. var a: array[1 10] of real; Câu 5.Cho đoạn chương trình sau: n:=1; While n<10 do Begin n:=n+1; Writeln(‘ xin chao’); end; Khi thực hiện chương trình câu “ xin chao” được viết ra màn hình mấy lần? A. 0 B.9 C. 10 D. Vòng lặp vô tận. Câu 6.Chỉ ra phát biểu sai trong các phát biểu dưới đây. A. Dạng cấu trúc lặp với số lần lặp biết trước được thể hiện bằng câu lệnh Pascal For… do. B. Các câu lệnh For do không thể lồng trong nhau C. Câu lệnh GotoXY(a,b) có tác dụng đưa con trỏ về cột a, hàng b. D. Câu lệnh GotoXY(a,b) có tác dụng đưa con trỏ về hàng a, cột b. II - PHẦN TỰ LUẬN : (7 đ) - Thời gian làm bài 35 phút Bài 1 Tìm lỗi trong chương trình và sửa lỗi chương trình cho đúng: Tính Tổng Các Số Tự Nhiên Từ 100 Đến 1000 (Vòng lặp với số lần lặp chưa biết). Program tinh_tong; Var i S: Integer; Begin i: 100; S = 0; While i > 1000 do S:= S + i i:= i + 1; Writeln(‘ Tong cac so tu nhien tu 100 den 1000 la:’,S); Readln; End. Bài 2. Viết chương trình nhập vào một mảng các số nguyên.Ghi ra màn hình giá trị trung bình cộng của mảng đó và các phần tử nhỏ hơn giá trị trung bình cộng của mảng. HƯỚNG DẪN CHẤM Ðề kiểm tra HKII Năm học 2010 -2011 - Môn :Tin học 8 I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3 đ) Câu 1 2 3 4 5 6 Kết quả A C D D B D Mỗi lựa chọn đúng 0,5điểm II - PHẦN TỰ LUẬN : ( 7 đ) Câu 1: ( 3 điểm) Program tinh_tong; Var i, S: Integer; {0,5điểm} Begin i:= 100; {0,5 điểm} S: = 0; {0,5 điểm} While i <=1000 do {1 điểm} S:= S + i; {0,5 điểm} i:= i + 1; Writeln(‘ Tong cac so tu nhien tu 100 den 1000 la:’,S); Readln; End. Câu 2: ( 4 đ) Chương trình có thể được viết như sau: Program tbc; Var a: array[1 100] of integer; i, n, tong: integer; tbc: real; Begin Write(‘Nhap vao so phan tu cua mang n= (<=100) :’); readln(n); Write(‘Nhap so nguyen:’); For i:=1 to n do Begin write(‘a[‘,i,’]:’); readln(a[i]); end; Tong:=0; For i:=1 to n do tong:=tong+a[i]; tbc:=tong/n; Writeln(‘Trung binh cong cua mang la:’, tbc:10:2); Writeln(‘ cac phan tu nho hon tbc la:’); For i:=1 to n do If a[i]<tbc then write(a[i]:5); Readln; End. Phần khai báo: 1 điểm. Phần nhập số nguyên: 1 điểm. Phần tính tổng các phần tử của mảng: 1 điểm. Phần in ra các phần tử nhỏ hơn tbc: 1 điểm. . KI M TRA HKII NĂM HỌC 20 10 -20 11 Môn : Tin học 8 I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3 đ ) - Thời gian làm bài 10 phút Thí sinh chọn chữ cái chỉ. trị trung bình cộng của mảng. HƯỚNG DẪN CHẤM Ðề ki m tra HKII Năm học 20 10 -20 11 - Môn :Tin học 8 I - PHẦN TRẮC NGHIỆM KHÁCH QUAN : ( 3 đ) Câu 1 2 3 4 5 6 Kết quả A C D D B D Mỗi lựa chọn đúng. Readln; End. Câu 2: ( 4 đ) Chương trình có thể được viết như sau: Program tbc; Var a: array[1 100] of integer; i, n, tong: integer; tbc: real; Begin Write(‘Nhap vao so phan tu cua mang n= (<=100)