Đề kiểm tra học kì II môn Tin học Lớp 8 - Trường THCS Cát Lái - Năm học 2019-2020 - Đề 1 (Có đáp án)

ỦY BAN NHÂN DÂN QUẬN 2 ĐỀ KIỂM TRA HỌC KỲ II 
TRƯỜNG THCS CÁT LÁI Năm học: 2019-2020 
MÔN: TIN HỌC LỚP 8. 
 Thời gian làm bài: 45 phút 
 (Không kể thời gian phát đề) 
I. PHẦN TRẮC NGHIỆM (5 điểm) 
Câu 1: Trong các cách khai báo biến mảng dưới đây, cách khai báo nào là đúng: 
A. Var A: =array[1..20] of integer; B. Var A:array(1..20) of integer; 
C. Var A:array[1..20] of integer; D. Var A: array[1..20] of in te ger. 
Câu 2: Cho đoạn chương trình Pascal sau đây: 
tong:= 10; 
While tong > 5do tong:=tong - 1; 
Sau khi đoạn chương trình trên được thực hiện, giá trị của tong bằng bao nhiêu: 
A. 9 B. 5 C. 8 D. 6 
Câu 3: Sau khi đoạn chương trình sau được thực hiện, giá trị của biến S bằng bao nhiêu: 
S:= 10; 
for i:= 1 to 5 do S:= S + 2; 
A. 14 B. 16 C. 18 D. 20 
Câu 4: Khi thực hiện đoạn chương trình sau: 
T:=15; 
For i:=1 to 10 do T:=T – 1; 
Hãy cho biết giá trị của biến T bằng bao nhiêu? 
A. 14 B. 13 C. 5 D. 10 
Câu 5: Chọn câu lệnh viết đúng ? 
A. For i:=1 to 5 do writeln(‘ Hoc sinh ); B. For i:=1 to 5 do writeln(‘Hoc sinh’); 
C. For i:=1 to 5 do write(‘Hoc sin’ h); D. For i:=1 to 5 do write(Hoc sinh); 
Câu 6:Câu lệnh nào viết đúng ? 
A. Program Baitap 5; B. Program Bai tap 4. 
C. Program Baitap6; D. Program Bai tap 2; 
Câu 7: Cho biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 2, 3, 4, 5 
Khi thực hiện câu lệnh sau: 
Tb:= 0; For i:= 1 to 5 do Tb := Tb + A[i]; Giá trị của biến Tb là bao nhiêu? 
A. 10 B. 11 C. 12 D. 15 
Câu 8: Cho biết giá trị của biến x và y sau khi thực hiện đoạn chương trình sau: 
X:= 0; Y:= 2; 
For i:= 1 to 4 do X:= X + Y; 
A. 4 B. 6 C. 7 D. 8 
Câu 9: Hãy chọn câu lệnh viết đúng ? 
A. Write(‘ Em yeu Truong em’ ); B. Write(‘Em yeu Truong em’) 
C. Writeln(Em yeu Truong em); D. Writeln(‘Em yeu Truong em’). 
Câu 10: Chọn câu lệnh nào viết đúng ? 
A. Readln(‘a’); B. Read(a); 
C. Readln(a). D. Read(a’). 
II. PHẦN TỰ LUẬN (5 điểm) 
Viết chương trình sử dụng biến mảng để nhập từ bàn phím một dãy n số nguyên. 
In ra màn hình dãy số vừa nhập và số lượng các số lẻ. 
Đáp án & Thang điểm 
I. PHẦN TRẮC NGHIỆM (5 điểm) 
Câu 1 2 3 4 5 6 7 8 9 10 
Đáp án C B D C B C D D A B 
II. PHẦN TỰ LUẬN (5 điểm) 
Nội dung trả lời Điểm 
Program Dem_Le; 
Uses crt; 
var i, n, Dem: integer; 
 A : array[1..100] of integer; 
0.5 
0.5 
Begin 
clrscr; 
writeln(‘Nhap do dai cua day so, n = ’); 
readln(n); 
0.5 
writeln(‘Nhap cac phan tu cua day so:’); 
For i:=1 to n do 
0.5 
Begin 
write(‘a[‘,i,’]=’); 
readln(a[i]); 
End; 
0.5 
writeln(‘Day so vua nhap la:’); 
 For i:=1 to n do write(a[i], ‘ ; ’); 
Dem:=0; 
For i:=1 to n do 
 If a[i] mod 2 0 then Dem:= Dem+1; 
0.5 
0.5 
0.5 
0.5 
writeln(‘Co ’,Dem,’ so le’); 
readln; 
End. 
 0.5