Giáo án Tin học Lớp 8 - Tiết 65: Kiểm tra một tiết (T1) - Năm học 2009-2010

KIỂM TRA MỘT TIẾT
( KT thực hành 2 tiết)
TuÇn 33
TiÕt 65
Ngµy so¹n: 05/04/2010
Ngµy d¹y: 13/04/2010
I. môc tiªu
1. KiÕn thøc
 - Kiểm tra kiến thức của HS về phần mảng
2. Kü n¨ng
- Luyện kỹ năng viết chương trình trên máy cho HS 
3. Th¸i ®é
- Nghiªm tóc lµm bµi 
II. CHUẨN BỊ
1. Giáo viên
a. Phương pháp: Trùc quan 
b. Phương tiện: Giáo án, ®Ò kiÓm tra 
2. HS: Sách, vở đọc trước bài ở nhà.
III. TIẾN TRÌNH DẠY - HỌC
1.Ổn định lớp
- Ổn định trật tự
- Kiểm tra sĩ số
2. Kiểm tra bài cũ 
3. KiÓm tra 
GV: Phát đề cho HS 
HS: Nhận đề và làm trên máy 
1. Em h·y khëi ®éng Pascal vµ l­u bµi theo ®­êng dÉn sau:
D\lop\ KT_ten vµ Viết chương trình Pascal nhập vào dãy gồm n (n<=100) điểm trung bình của học sinh. Tìm điểm trung bình cao nhất. 
Đáp án và biểu điểm 
Đáp án 
Biểu điểm 
 - l­u bµi ®óng ®­êng dÉn,®óng tªn 
Program P_Max;
 uses crt;
Var i,n : integer;
 Max: Real;
 A: array[1..100] of Real;
Begin
clrscr;
Write('nhap so hoc sinh'); Readln(n);
 For i:=1 to n do 
 Begin
 write('a[',i,']='); readln(a[i]);
 End;
Max:= A[1];
For i:= 2 to n do If Max < A[i] then Max:= A[i];
Writeln(' diem cao nhat la', Max:5:2);
 readln;
End.
1
0.25
0.25
0.5
0.5
0.5
0.25
0.25
0.5
1
0.25
0.5
0.25
1.5
1.5
0.5
0.25
0.25
4. Cñng cè 
 5. Dặn Dò
 - Häc sinh vÒ nhµ ôn bài, tiết sau chúng ta «n tËp ®Ó thi HK2
IV. RÚT KINH NGHIỆM