Ngày Soạn: 09/ 10/2010 Ngày dạy : Lớp 8A1: /
Lớp 8A2: /
Lớp 8A3: /
Tiết 16
KIỂM TRA 1 TIẾT ( LT)
I. MỤC TIÊU:
- Biết cách chuyển các biểu thức toán học sang các kí hiệu trong Pascal.
- Biết sử dụng các câu lệnh đơn giản để viết chương trình.
II. Chuẩn bị:
GV: xây dựng ma trận đề
MA TRẬN ĐỀ:
Chủ đề
Nhận biết Thông hiểu Vận dụng
Tổng
TNKQ TNTL TNKQ TNTL TNKQ TNTL
Khái niệm ban đầu về
chương trình và ngôn ngữ
lập trình
4 câu
2đ
4 câu
2đ

Thực hiện tính toán với các
kiểu dữ liệu


5 câu
3đ

Thực hành viết chương
trình 1 câu
3đ

1 câu
3đ

Tổng
6 câu
3đ

4 câu
3đ

3 câu
4đ

13 câu
10đ


Câu 2: Viết các câu lệnh xuất kết quả của biểu thức
2
5 (8 2).2
  ra màn hình.
C. VIẾT CHƯƠNG TRÌNH (3 điểm):
Viết chương trình nhập vào số nguyên x bất kỳ rồi xuất ra bình phương của số đó.

IV. Đáp án biểu điểm:
A. TNKQ (5 điểm): Mỗi câu đúng được 0.5 điểm.
1. A. 2. C. 3. A. 4. C. 5. B. 6. D. 7. B. 8. B. 9. D. 10. D.
B. TNTL (2 điểm):
Câu 1: Var x: integer; (0.5 đ)
y: real; (0.5 đ)
Câu 2: Writeln(5*5 + (8-2)*2); (1 đ)
C. VIẾT CHƯƠNG TRÌNH (3 điểm):
Var x: integer; (0.5 đ)
Begin
Readln(x); (1 đ)
Writeln(x*x); (1 đ)
End.
- Chương trình không gặp lỗi. (0.5 đ)
- Gặp 1 lỗi (-0.25 đ)

THỐNG KÊ CHẤT LƯỢNG BỘ MÔN
TSH
S
Giỏi Kh TB TC
Yếu Km
TS % TS % TS % TS % TS % TS %
8A

BEGIN
Clrscr;
Write(‘nhap so luong cac phan tu trong day so: ’); readln(n);
………. i:=1 to n do ………
Write(‘ nhap gia tri phan tu thu ‘ , I , ‘A[‘, I , ‘] = ’); readln(A[i]); sum:=sum+A[i];
………………;
TB:=sum/n
Writeln(‘tong cactrong day so : ’, …… );
Writeln(‘Trung binh cac so trong day so : ’, ………:5:3);
Readln
END.
2) Sau khi viết xong  dịch chương trình, sửa lỗi nếu có
3) Chạy chương trình nhập số liệu để kiểm tra kết quả thực tế và ghi vào bảng sau
n A[1] A[2] A[3] A[4] A[5] A[6] SUM TB
6 ?????? ?????? ?????? ?????? ?????? ?????? ?????? ??????
4) Lưu lại sự thay đổi