Giáo án Tin học 8 tiết 55: Kiểm tra 1 tiết

Ngµy so¹n: 14/03/2010	TiÕt theo ppct: 55
Ngµy d¹y: 17/03/2010
TiÕt 55. KIỂM TRA 1 TIẾT
I Mục tiêu: 
1. Kiến thức: Đánh giá việc lĩnh hội kiến thức về vòng lặp
2. Kỷ năng: Đánh giá về kỷ năng hiểu nguyên tắc hoạt động của câu lệnh lặp và dự đoán kết quả sau khi thực hiện chương trình.
3. Thái độ: Tự khi làm việc với các vòng lặp và tính độc lập sáng tạo.
II. Tiến trình lên lớp: 
Ổn định lớp
Nêu yêu cầu bài kiểm tra.
Phát đề
 Phần I: Trắc nghiệm(6đ)
Câu 1: trong câu lệnh lặp:
	For i:=1 to 9 do beginend;
	Câu lệnh ghép được thực hiện bao nhiêu lần?
A. 10 lần.	B. 1 lần
C. 9 lần	D. không lần nào	
Câu 2: đoạn chương trình sau đây cho kết quả gì? 
 So:=1;
 While so<=10 do writeln(so); 
 so:=so+1;
A. in ra các số từ 1 đến 9	B. không đáp án nào đúng.
C. in ra vô hạn các số 1.	D. in ra các số từ 1 đến 10
Câu 3: Cho đoạn chương trình sau:
x: = 0; tong:= 0;
while tong <= 20 do begin writeln(tong); tong:=tong+1 end;
x:= tong;
Sau đoạn chương trình trên, giá trị biến x bằng bao nhiêu?
A. 20	B. không xác định được ;	 	C. 0 ; D. 21.
Câu 4: sau khi thực hiện đoạn chương trình sau, giá trị của biến j bằng bao nhiêu?
j: =2;
For i:= 1 to 6 do j:=j+3;
A. 5	B.23 	C. 20	D.21	 
Câu 5: Tìm hiểu đoạn chương trình sau và cho biết nó thực hiện bao nhiêu vòng lặp?
S:=10; n:=0;
While s>=1 do begin n:=n+1; s:= s-n end;
A. 4	B. 7 	C. 3	D. 6	
Câu 6: hãy cho biết sau khi kết thúc đoạn chương trình sau đây, gái trị của các biến i, j, k bằng bao nhiêu?
i:= 1; j:= 2; k:= 3
while i<5 do begin i:=i+1; j:=j+1; k:=k+j end;
A. i=5, j=6, k= 28;	B. i=6, j=5, k= 21.	
C. i=4, j=6, k=20;	D. i=5, j=6, k= 21;
Phần II (Tự luận):
Câu 1(2 điểm). Trong các lệnh lặp Pascal sau đây, câu lệnh nào sai và sai ở đâu?
i:=1; while i<10 do sum:= sum + i; i= i + 1;
While a <= b; do write(‘b khong nho hon a’);
While 1=1 do write(‘Toi lap trinh gioi’);
While i:= 1 do t:=10;
câu 2(2 điểm): hãy cho biết sau khi thực hiện đoạn chương trình sau, máy tính thực hiện bao nhiêu vòng lặp, giá trị của biến s bằng bao nhiêu ? hãy viết chương trình thể hiện các thuật toán đó?
B1. s ß 20 , xß0.5
B2. nếu s > 23.2 thì chuyển đến b4
B3. sß s+x và quay lại b2.
B4. kết thúc.
§¸p ¸n:
I. tr¾c nghiÖm:mçi c©u ®óng ®­îc 1 ®iÓm
1 c; 2c; 3d; 4c; 5a; 6d
II. tù luËn:
C©u 1:Mçi c©u 0.5 ®iÓm
thiÕu begin vµ end, lÆp v« h¹n lÇn
thõa dÊu “;”.
LÆp v« h¹n lÇn.
Sai ®iÒu kiÖn.
C©u 2: 2 ®iÓm
LÆp 7 vßng(0.5 ®), S=23.5 (0.5 ®);
Ch­¬ng tr×nh(1 ®iÓm)
S:=20;x:=0.5;
While s<=23.2 do s:=s+x;
Writeln(s);