Kiểm tra thục hành Tin 8 Tiết 61

Tuần 31:
Ngày soạn: 12/ 04/ 2010.

Tiết 61: Kiểm tra thực hành (1 tiết)
I/ Mục tiêu:
Học sinh thực hiện kiểm tra thực hành trên máy tính.
Kiếm thức chủ yếu thuộc 3 bài học cuối cùng.
ý thức làm bài và bảo vệ máy tính để sử dụng lâu dài.
II/ Chuẩn bị:
- Sách giáo khoa, giáo án, tài liệu tin học có liên quan.
- Đọc tài liệu ở nhà trước khi
III. Tiến trình lên lớp:
Tổ chức.
Kiểm tra.
Kiểm tra sự chuẩn bị của học sinh .
Bài mới:
Hoạt động của giáo viên
Hoạy động của học sinh

Giáo viên phát đề cho học sinh .
Theo dõi học sinh làm bài theo quy chế thi hiện hành.
Thu bài và nhận xét giờ kiểm tra.
Về nhà làm lại bài kiểm tra vào vở học của mình.
Giờ sau học ôn tập học kỳ 1 hai tiết Các em chuẩn bị.
Học sinh nhận bài thi.
Học sinh làm bài kiểm tra của mình.
Học sinh trả bài cho giáo viên.
Nghe giáo viên dặn dò, chuẩn bị cho giờ sau.

A) Đề bài:
Câu 1: Lập trình tính tổng:
A= 1+2+3+..+n
ở đây n là số tự nhiên được nhập từ bàn phím. (viết bằng lệnh while .. do)
Câu 2 : Bạn hãy tính tổng
 
 

(viết bằng lệnh for ... do)
(Lưu ý : Mỗi câu được ghi lại thành 1 File ở Mydocuments có tên là tên hs_lop8.PAS).
B) đáp án + thang điểm và hướng dẫn chấm.
Câu 1 :
Làm đúng cho 5 điểm :
Câu
Nội dung
Điểm

1
Program B1 ;
Uses CRT;
Var
i, n: integer;
tong: real;
1,5


Begin
Clrscr;
write(`cho so tu nhien n: `); Readln(n);
tong:=0; i:=1;
1,5


while i<= n do
Begin
tong:= tong+ i;
i: = i+1;
End;
1


writeln(` Tong can tim la: `, tong:12:6);
Readln;
End.
1

2
Làm đúng cho 5 điểm
1,5


Program B2;
Var i: byte;
s: real;



Begin
s:=0;
1,5


 For i:=1 to 20 do s:= s+1/i;
1


Writeln(` 1+ 1/2 + 1/3 + .. . + 1/20 = `, s: 14:10);
Readln; End.
1

Thu bài ( HD về nhà)
Giáo viên thu bài của học sinh.
HS về nhà làm lại bài này vào vở,
Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và luyện viết, làm đi làm lại nhiều lần.
Xem trước bài học “Quan sát hình không gian với Yenka”.