De kiem tra hoa 8_Tiet 70

ĐỀ KIỂM TRA HK2 (ĐỀ A)
Năm học: 2009 -2010
Môn: Tin học 8
Thời gian: 45 phút


Điểm
Lời phê







I. TRẮC NGHIỆM (6đ)

Câu 1: Lần lượt thực hiện đoạn lệnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; Giá trị của t là
1
2
3
6


Câu 2: Sau khi thực hiện đoạn chương trình sau, giá trị của biến a bằng bao nhiêu?
a:=2 ;
For i:= 0 to 3 do a:= a+3;
5
8
11
14


Câu 3: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :
s:=1;
for i:=1 to 5 do s := s *i;
writeln(s);
Kết quả in lên màn hình là :
2
6
24
120


Câu 4: Xem ví dụ sau trong Pascal:
Var i:integer;
Begin
I:=1
While i<15 do
Begin
Writeln(‘0’);
i:=i+1;
End;
End.
Ví dụ trên ghi ra màn hình bao nhiêu chữ số 0?
1
13
14
15


Câu 5: Chọn khai báo hơp lệ
Const n=5;
Var a,b: array[1..n] of real;
Var n: Integer;
a,b: array[1:n] of real;

Var a,b: array[1..n] of real;
Var a,b: array[1..5..10] of real;


Câu 6: Tham chiếu tới các phần tử của mảng được xác định bằng cách:
[chỉ số]
[chỉ số]


[tên biến mảng][chỉ số]


Câu 7: Hãy chỉ ra lỗi trong các câu lệnh sau và viết lại cho đúng
For i=1 to 10 do x:=x+1;

For i:=1 to 10; do x:=x+1;

x:= 8; while x = 8 do x = x+3;

s:=0; n:=0; while s <=10 do n:=n+1; s:=s+n;

Var x: Array[1,20] Of Real;

Var x: Array[20..1] Of Integer;

II. TỰ LUẬN

Câu 8: Cho biết tác dụng của câu lệnh lặp với số lần biết trước (1đ)





Câu 9: Hãy tìm hiểu thuật toán sau đây:
Bước 1: X(16, n (2.
Bước 2: Nếu X <= 6.5, chuyển tới bước 4.
Bước 3: X(X-n và quay lại bước 2.
Bước 4: Thông báo X và kết thúc thuật toán

Hãy cho biết:
Khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của X bằng bao nhiêu? (1đ)
Viết chương trình Pascal thể hiện thuật toán đó? (2đ)










 ĐỀ KIỂM TRA HK2 (ĐỀ B)
Năm học: 2009 -2010
Môn: Tin học 8
Thời gian: 45 phút


Điểm
Lời phê







I. TRẮC NGHIỆM (6đ)

Câu 1: Để khai báo biến mảng kiểu số nguyên trong Pascal có dạng:
Var :array [..] of integer;
Trong đó:
Chỉ số đầu = chỉ số cuối
Chỉ số đầu > chỉ số cuối

Chỉ số đầu < chỉ số cuối
Chỉ số đầu <> chỉ số cuối


Câu 2: Đoạn chương trình sau có bao nhiêu vòng lặp?
a:=2 ;
for i:= 0 to 3 do a:= a+3;
0
3
4
5


Câu 3: Hãy đọc đoạn chương trình sau, sau khi thực hiện xong, kết quả s bằng:
s:=0;
For i:= 1 to 5 do s:= s * i;
0
15
120
Kết quả khác


Câu 4: Xem ví dụ sau trong Pascal:
Var i:integer;
Begin
i:=