tra thực hành.
Tiết 31 Ngày soạn : 06/12/09
Tuần 16 Ngày dạy : 08/12/09
KIỂM TRA 1 TIẾT (TH)A. MỤC TIấU A. MỤC TIấU
1. Kiến thức:
- Hệ thống lại một số kiến thức đó học. 2. Kỹ năng:
- Biết sử dụng vũng lặp xỏc định và vũng lặp khụng xỏc định để viết chương trỡnh.
3. Thỏi độ:
- Nghiờm tỳc
B. CHUẨN BỊ 1. Giỏo viờn: 1. Giỏo viờn:
- Bài kiểm tra, phong mỏy hoạt động tốt
2. Học sinh
- Chuẩn bị bài tốt
1.Giỏo viờn gọi HS theo danh sỏch vào phũng mỏy
2.Phỏt đề thi cho HS
3.Cho HS kiểm tra và quan sỏt
4.Chấm điểm cho HS
5.Nhận xột tiết kiểm tra Ma trận đề: Ma trận đề:
Nội dung Mức độ
Bài 1,2,3… Bài 1,4,5,6,7.. Bài 7,8,9.. Tổng
Nhận biết Cõu 1: 2đ 2
Thụng hiểu Cõu 3: 2đ 2
Vận dụng Cõu 2: 6đ 6
Đề bài:
Cõu 1: Viết chương trỡnh đưa ra dũng thụng bỏo “ Chào cỏc bạn!
Tụi là Turbo Pascal!” (2đ) Cõu 2. Em hóy viết chương trỡnh tớnh tổng s=1+1/2+1/3+1/4+...+1/n (6đ) Cõu 3. Em hóy dịch, sửa lỗi, chạy chương trỡnh và kiểm tra kết quả (2đ)
Đỏp ỏn:
Cõu 1: Chương trỡnh
Program Dua_ra_dong_thong_bao; Usse crt;
Begin
Writeln(‘ Chao cac ban’); Write(‘Toi la Turbo Pascal’); End. Cõu 2: Chương trỡnh tớnh tổng Program Tinh_tong; Var i,n:integer; s: real; Begin
Write(‘ Nhap n:’); readln(n) S:=0; S:=0;
For i:=1 to n do s:=s+1/i;
Writeln(‘ Ket qua cua tong s la:’,s); Readln Readln
End.
Cõu 3. Nhấn Alt + F9 để dịch và sửa lỗi , nhấn Ctrl +F9 để chạy và kiểm tra chương trỡnh
Tiết 32 Ngày soạn : 06/12/09
Tuần 16 Ngày dạy : 08/12/09
ễN TẬP A. Mục tiờu:
1. Kiến thức:
- Củng cố cỏc kiến thức đó học và vận dụng để viết một số chương trỡnh 2. Kĩ năng:
- Rốn luyện kĩ năng sử dụng một số cõu lệnh để viết chương trỡnh. 3. Thỏi độ:
- Thỏi độ học tập nghiờm tỳc, yờu thớch mụn học.
B. Chuẩn bị:
1. Giỏo viờn: SGK, giỏo ỏn, mỏy tớnh điện tử. 2. Học sinh: SGK, đồ dựng học tập...