Kiểm tra học kì II - Năm học 2011 - 2012 môn: Tin học 8 - Trường THCS Đức Lập

PHỊNG GD & ĐT ĐỨC HỊA KIỂM TRA HỌC KÌ II - NĂM HỌC 2011-2012
TRƯỜNG THCS ĐỨC LẬP 	 MƠN: Tin học 8
	 Thời gian: 45 phút (Khơng kể thời gian phát đề)
Họ và tên :
Lớp : 8/ 
Ngày thi: 
Điểm
Lời phê
 Duyệt
A/ LÝ THUYẾT: (6 điểm )Hãy chọn một đáp án đúng nhất rồi điền vào bảng dưới đây:
Câu 
Câu1
Câu2
Câu3
Câu4
Câu5
Câu6
Câu7
Câu8
Câu9
Câu10
Câu11
Câu12
Đáp án
Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng?
for i := 4 to 1 do writeln(‘A’);
for i := 1 to 10 writeln(‘A’);
for i := 1 to 100 do writeln(‘A’);
for i to 10 do writeln(‘A’);	
Câu 2. Trong câu lệnh lặp: for n:= 1 to 6 do begin ... end;
Câu lệnh ghép được thực hiện bao nhiêu lần?
7 lần;
6 lần;
5 lần;
Khơng lần nào;
Câu 3. Câu lệnh lặp For ...to ... do cĩ:
Số lần lặp là vơ hạn.	
Số lần lặp biết trước.
Số vịng lặp phải nhỏ hơn 100.
Số vịng lặp khơng biết trước.
Câu 4. Sau khi thực hiện chương trình dưới đây, giá trị của biến j bằng bao nhiêu?
j:= 1; 
for i:= 0 to 10 do j:= j+1;
12;
13;
11;
14;
Câu 5. Trong Pascal, câu lệnh nào sau đây là đúng?
i:=0; S:=1; While S<10 do S=S+i; i=i+1; 
i:=1; S:=0; while s<10 do begin S:=S+i; i:=i+1; end; 
n:=2; while n<5; do write(‘A’);
Cả A và B đều đúng
Câu 6. Cú pháp đầy đủ của câu lệnh While  do là:
While do ;
While ; ;
While to do;
While do ;
Câu 7. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vịng lặp khi thực hiện đoạn chương trình ?	n:=10; T:=100;
While n>10 do n:=n+5; T:=T - n;
0
4
6
10
Câu 8. Đoạn lệnh dưới đây sẽ cho kết quả là gì?
 	so := 1;
	While so <10 writeln(so); so := so + 1;
In ra các số từ 1 đến 10;
Chương trình báo lỗi;
In ra vơ hạn số 1 trên một cột;
In ra vơ hạn số 1 trên một dịng ;
Câu 9. Trong Pascal, câu lệnh khai báo biến mảng nào sau đây đúng?
var a : array[10..1] of integer;
var b : array(1..100) of real;
var c : array[1..15] of integer;
var d : array[-2..-5] of real;
Câu 10. Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị? 
5;
4;
6;
7;
Câu 11. Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:
Chỉ số đầu > chỉ số cuối;
Chỉ số đầu chỉ số cuối;
Kiểu dữ liệu chỉ cĩ thể là real;
Cả ba ý trên đều đúng;
Câu 12. Giả sử 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, 4, 7, 2, 6. Khi thực hiện câu lệnh dưới đây giá trị của biến tb là bao nhiêu?
tb:= 0; For i:= 1 to 5 do tb := tb + A[i];
19;
18;
21;
20;
B/ BÀI TẬP (4 điểm)
Câu 1. (2 điểm) Cho thuật tốn sau:
	B1: j ß 0; T ß 105;	
	B2: Nếu T< 20 thì chuyển qua B4;	
	B3: j ß j + 5; T ß T – j;	
	B4: In ra kết quả T và j;	
a. Hãy cho biết, khi thực hiện thuật tốn trên, máy tính sẽ thực hiện bao nhiêu vịng lặp và giá trị của T và j là bao nhiêu.
..........................................................................................................................................................................
b. Viết câu lệnh pascal thể hiện thuật tốn trên.
..................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................
Câu 2. (2 điểm) Viết chương trình nhập vào 8 số nguyên rồi tìm max day so đĩ.
Yêu cầu : Khai tên báo biến mảng dayso, với chỉ số đầu là 1, chỉ số cuối là 20, kiểu dữ liệu số nguyên.
............................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................
I/ MA TRẬN ĐỀ
 Mức độ
Nội dung
Nhận biết
Thơng hiểu
Vận dụng
Tống
TN
TL
TN
TL
TN
TL
Bài 7: Câu lệnh lặp
2
1
1
0,5
2
1
5
2.5
Bài 8: Lặp với số lần chưa biết trước
2
1
2
1
1
2
5
4
Bài 9: Làm việc với dãy số
2
1
1
0,5
1
2
4
3.5
Tổng
6
3 
2
1 
6
6 
14
10
Tỷ lệ(%)
30
10
60
100
II/ ĐÁP ÁN VÀ BIỂU ĐIỂM 
A/ LÝ THUYẾT: (6 điểm – mỗi câu đúng 0,5 điểm).
Câu 
Câu1
Câu2
Câu3
Câu4
Câu5
Câu6
Câu7
Câu8
Câu9
Câu10
Câu11
Câu12
Đáp án
C
B
B
A
B
D
A
B
C
A
B
D
B/ BÀI TẬP (4 điểm)
CÂU
ĐÁP ÁN
ĐIỂM
Câu 1
a
- Khi thực hiện thuật tốn trên, máy tính sẽ thực hiện 06 vịng lặp.
0.5
- T = 0; j = 30.
0.5
b
Đoạn chương trình thể hiện thuật tốn:
j := 0;
0.25
T := 105;
0.25
While T >= 20 do begin j := j + 5; T := T - j; end;
0.25
Write(T); write(j);
0.25
Câu 2
Program cau_2;
Uses crt;
Var max, i : integer;
dayso : array[1..20] of integer;
0.25
Begin
Clrscr;
so_chan:=0;
0.5
For i := 1 to 8 do
Begin
Write(‘phan tu thu ‘,i,’ la = ‘);
readln(dayso[i]);
End;
0.5
Max:=dayso[1];
For i := 2 to 8 do
Begin
 If max<dayso[i] then max:=dayso[i];
End;
0.5
Writeln(‘So lon nhat day so ‘,max);
Readln; End.
0.25