Tuan 18 - tiet 33 - tin 6 -2012

KIỂM TRA THỰC HÀNH

I. Mục tiêu:
1. Kiến thức: Học sinh biết được các kiến thức cơ bản nhất về lập trình đơn giản với ngôn ngữ Pascal.
2. Kĩ năng: Viết được một chương trình với ngôn ngữ Pascal đơn giản.
3. Thái độ: Nghiêm túc trong quá trình kiểm tra, có ý thức trong phòng máy.
II. Chuẩn bị:
- Gv: Đề kiểm tra, giáo án, phòng máy.
- Hs: Học bài, chuẩn bị các nội dung đã được học trong tiết bài tập.
III. Phương pháp:
- GV giới thiệu, đưa ra yêu cầu, Hs thực hành cá nhân trực tiếp trên máy.
IV. Tiến trình bài dạy:
Ổn định lớp:
8A1:................................................................................................................
8A2:................................................................................................................
2. Nội dung kiểm tra:
Tạo một Folder trên ổ đĩa D với thư mục D: en hoc sinh_lop.
Ví dụ D:Huy_lop8a1ai1.Pas.
Câu 1: (3 điểm) Viết chương trình in ra màn hình dòng chữ “Toi la Turbo Pascal”. Lưu bài với đường dẫn và tên D: en hoc sinh_lopBai1.Pas.
Câu 2: (7 điểm) Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in ra màn hình hai số đó theo thứ tự tăng dần. Lưu bài với đường dẫn và tên D: en hoc sinh_lopBai2.Pas.
3. Đáp án thang điểm:

Câu 1: (3 điểm)
Program Bai1; (0.5 điểm).
Uses Crt; (0.5 điểm).
Begin (0.5 điểm).
Clrscr; (0.5 điểm).
Writeln(‘Toi la Turbo Pascal’); (0.5 điểm).
End. (0.5 điểm).
Câu 2:
Program Bai2; (0.5 điểm).
Uses Crt; (0.5 điểm).
Var a, b, tong: Integer; (0.5 điểm).
Begin (0.5 điểm).
Clrscr; (0.5 điểm).
Writeln(‘Nhap so a : ’); (0.5 điểm).
Readln(a); (0.5 điểm).
Writeln(‘Nhap so b : ’); (0.5 điểm).
Readln(b); (0.5 điểm).
If a < b Then Writeln(a,‘ ’,b) Else Writeln(b,‘ ’,a); (1.5 điểm).
Readln; (0.5 điểm).
End. (0.5 điểm).

4. Kết quả bài kiểm tra:

Loại
Lớp
Giỏi
Khá
TB
Yếu
Kém

8A1






8A2







* Nhận xét:




* Biện pháp: