Đề kiểm tra học kỳ II (đề A) môn Tin học 8

C:\tempconvert\3271_kiem_tra_hkii_tin_8_T9y2HzoZtUpl5u_024548.doc 1

Họ và tên: .................................................................................................................................. ĐỀ KIỂM TRA HỌC KỲ II (Đề A) Lớp: ........................................... MÔN: TIN HỌC 8

Phần I: (5đ) TRẮC NGHIỆM. Hãy khoanh tròn vào chữ cái đứng trước câu trả lời em cho là đúng nhất

Câu 1: Lệnh lặp nào sau đây là đúng?

A. For <biến đếm>= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; B. For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; C. For <biến đếm>:= <giá trị cuối> to <giá trị đầu> do <câu lệnh>; D. For <biến đếm>: <giá trị đầu> to <câu lệnh> do <giá trị cuối>; Câu 2: Vòng lặp While <Điều kiện> do <Câu lệnh>; là vòng lặp: A. Chưa biết trước số lần lặp B. 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 D. Biết trước số lần lặp nhưng giới hạn là >=100 Câu 3: Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu:

s:=1; for i:=1 to 5 do s := s*i; A.120 B. 55 C. 121 D. 151 Câu 4: Phần thân chương trình bắt đầu bằng từ khóa:

A. End. B. Begin. C. Uses. D. Var. Câu 5: Chọn khai báo hợp lệ:

A. Var a,b: array[1 .. n] of real; C. Var a,b: array[1 : n] of Integer; B. Var a,b: array[1 .. 100] of real; D. Var a,b: array[1 … 100] of real; Câu 6: Đâu là công việc phải thực hiện nhiều lần với số lần biết trước?

A. Hàng ngày em đi học. B. Em bị ốm vào một dịp có dịch cúm C. Đến nhà bà ngoại chơi vào một hôm cả bố và mẹ đi vắng D. Ngày đánh răng ba lần Câu 7: Pascal sử dụng câu lệnh lặp nào sau đây để lặp với số lần chưa biết trước?

a/ For…do; b/While…do; c/ If..then; d/ If…then…else;

Câu 8: Em được học vẽ hình với phần mềm nào?

a/ Pascal; b/ Geogebra; c/ Mario; d/ Finger Break out; Câu 9: Trong Pascal để dừng chương trình trong 5 giây ta dùng lệnh? A. Readln(500); B. Readln(5000); C. Delay(5000); D. Delay(500); Câu 10: Biến a được nhận các giá trị là 0 ; -1 ; 1 ; 2,3 . Ta có thể khai báo a thuộc kiểu dữ liệu nào?

a. Integer b. Char c. Real d. Integer và Longint

Phần II: TỰ LUẬN (5 điểm) - Đề A

Câu 1(2 điểm): Điền X vào các ô sao cho phù hợp và giải thích vì sao?

Câu Đúng Sai Giải thích a) for i=1 to 10 do writeln('A'); b) var X: Array[5…10] Of real; c) X:=10; while X=10 do; X := X+5; d) if x>5 then a:=b; else m := n;

ThuVienDeThi.com

C:\tempconvert\3271_kiem_tra_hkii_tin_8_T9y2HzoZtUpl5u_024548.doc 2

Câu 2: (3đ) Viết chương trình tính tổng N số tự nhiên đầu tiên bắt đầu =1. Với N là một số bất kỳ được nhập vào từ bàn phím.

ThuVienDeThi.com

C:\tempconvert\3271_kiem_tra_hkii_tin_8_T9y2HzoZtUpl5u_024548.doc 3

ĐÁP ÁN: Phần I: 5đ 1 2 3 4 5 6 7 8 9 10 B A A B B D B B C C

Phần II: Câu 1: 2đ

Câu 2: Program tinhtong; Uses crt; Var s,n,i:integer; Begin Write(‘nhap so n=’); readln(n); S:=0; For i:=1 to n do s:=s+i; Writeln(‘tong cua ‘,n,’ so tu nhien dau tien la: ’,s); Readln End.

Câu Đúng Sai Giải thích a) for i=1 to 10 do writeln('A'); X i:=1 b) var X: Array[5…10] Of real; X [5..10] c) X:=10; while X=10 do; X := X+5; X do X:=X+5; d) if x>5 then a:=b; else m := n; X a:=b else m:=n;

ThuVienDeThi.com