Giáo án Tin học 8 - Tiết 37-46 - Năm học 2009-2010 - Trường THCS An Thái

TiÕt 37	 Ngµy so¹n 04/01/2010
Tiết 37: TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES
I. MụcTiêu:
HS hiểu được các chức năng chính của phần mềm, sử dụng phần mềm để quan sát thời gian địa phương của các vị trí khác nhau trên trái đất.
Hs có thể tự thao tác và thực hiện một số chức năng chính của phần mềm.
Thông qua phần mềm HS sẽ hiểu biết thêm về thiên nhiên, trái đất, từ đó nâng cao ý thức bảo vệ môi trường sống.
II/ Chuẩn bị:
Gv: phòng máy, bài tập thực hành.
Hs: kiến thức cũ, sgk.
III/ Tiến trình dạy – học:
ổn định lớp: 1’
Kiểm tra bài cũ: 
Bài mới:
HOẠT ĐỘNG CỦA THẦY VÀ TRÒ
NỘI DUNG
5’
Cho học sinh đọc thông tin ở SGK
? Em hiểu thế nào về phần mềm SUN TIMES?
Giáo viên giải thích theo SGG
 Phần mềm Sun Times sẽ giúp em nhìn được toàn cảnh các vị trí, thành phố thủ đô của các nước trên toàn thế giới với rất nhiều thông tin liên quan đến thời gian. Ngoài ra, phần mềm còn cung cấp nhiều chức năng hữu ích khác liên quan đến thời gian Mặt Trời mọc, Mặt Trời lặn, nhật thực, nguyệt thực,...
1. Giới thiệu phần mềm
Phần mềm Sun Times sẽ giúp em nhìn được toàn cảnh các vị trí, thành phố thủ đô của các nước trên toàn thế giới với rất nhiều thông tin liên quan đến thời gian. Ngoài ra, phần mềm còn cung cấp nhiều chức năng hữu ích khác liên quan đến thời gian Mặt Trời mọc, Mặt Trời lặn, nhật thực, nguyệt thực,...
12’
Giáo viên cho học sinh nhìn vào màn hình chính của mà ảnh
Trên bản đồ có các vùng sáng, tối khác nhau. Vùng sáng cho biết các vị trí thuộc vùng này tại thời điểm hiện thời là ban ngày. Ngược lại, các vùng tối chỉ ra các vị trí thuộc vùng này là ban đêm.
-Giữa vùng sáng và tối có một đường vạch liền, đó là ranh giới giữa ngày và đêm. Tại các vùng có đường này đang là thời gian Mặt Trời lặn hoặc mọc ở đường chân trời. Chúng ta gọi các đường này là đường phân chia thời gian sáng/tối.
-Trên bản đồ có những vị trí được đánh dấu. Đó chính là các thành phố và thủ đô các quốc gia. Khi nháy chuột lên các vị trí này em sẽ nhìn thấy thông tin chi tiết liên quan đến thành phố này hiện ra trong các khung nhỏ phía
? Hãy nêu cách khởi động phần mềm
? màm hình chính gồm những gì?
? Hãy nêu cách thoát khỏi phần mềm.
2. Màn hình chính của phần mềm
a) Khởi động phần mềm
Nháy đúp vào biểu tượng để khởi động phần mềm. 
b) Màn hình chính
Màn hình chính của phần mềm là bản đồ các nước trên thế giới. Hãy quan sát kĩ để hiểu và nhận biết các thông tin mà bản đồ mang lại.
c) Thoát khỏi phần mềm.
Muốn thoát khỏi phần mềm thực hiện lệnh File®Exit hoặc nhấn tổ hợp phím Alt+F4.
Củng cố: 25’
GV nhắc lại nội dung bài học.
Cho học sinh thực hành mở xem màn hình chí và thoát khỏi phần mền.
Học sinh nghe và thực hành trên máy.
Hướng dẫn học ở nhà: 2’
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.
Làm các bài tập còn lại,
Đọc bài mới để giờ sau học.
----------------------------------–:—----------------------------------
TiÕt 38	 Ngµy so¹n 04/01/2010
Tiết 38: TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES
I. MụcTiêu:
HS hiểu được các chức năng chính của phần mềm, sử dụng phần mềm để quan sát thời gian địa phương của các vị trí khác nhau trên trái đất.
Hs có thể tự thao tác và thực hiện một số chức năng chính của phần mềm.
Thông qua phần mềm HS sẽ hiểu biết thêm về thiên nhiên, trái đất, từ đó nâng cao ý thức bảo vệ môi trường sống.
II/ Chuẩn bị:
Gv: phòng máy, bài tập thực hành.
Hs: kiến thức cũ, sgk.
III/ Tiến trình dạy – học:
ổn định lớp:	1’
Bài cũ: 	5’
 Hãy nêu cách khởi động, thoát khỏi phần mềm SUN TIMES
Bài mới:
HOẠT ĐỘNG CỦA THẦY VÀ TRÒ
NỘI DUNG
17’
Cho học sinh đọc thông tin.
Muốn phóng to ta làn ntn?
Muốn phóng to một vùng hình chữ nhật trên bản đồ em có thể dùng cách sau
Trên bản đồ có các vùng sáng, tối khác nhau cho biết thời gian hiện tại của các vùng này là ngày hay đêm. Tại ranh giới phân chia ngày và đêm, sẽ là thời điểm chuyển giao giữa đêm-ngày (Mặt Trời mọc) và ngày-đêm (Mặt Trời lặn).
chúng ta thấy Mặt Trời chuyển động từ Đông sang Tây. Trên bản đồ, ta sẽ thấy các vùng tối "chuyển động" theo hướng từ phải sang trái.
Bây giờ em sẽ tìm hiểu kĩ hơn một địa điểm, một thành phố trên Trái Đất: 
3. Hướng dẫn sử dụng
a) Phóng to quan sát một vùng bản đồ chi tiết
Nhấn giữ nút chuột phải và kéo thả từ một đỉnh đến đỉnh đối diện của hình chữ nhật này. Một cửa sổ xuất hiện hiển thị vùng bản đồ được đánh dấu đã được phóng to. 
b) Quan sát và nhận biết thời gian: ngày và đêm
Chúng ta đã biết do Trái Đất tự quay và quay quanh Mặt Trời tạo ra ngày và đêm. Theo sự chuyển động của Trái Đất.
c) Quan sát và xem thông tin thời gian chi tiết của một địa điểm cụ thể
d) Quan sát vùng đệm giữa ngày và đêm
Quan sát kĩ vùng này sẽ cho em nhiều thông tin thú vị.
Vïng ®Öm chuyÓn gi÷a ngµy vµ ®ªm: s¸ng sím
Vïng ®Öm chuyÓn gi÷a ngµy vµ ®ªm: chiÒu tèi
e) Đặt thời gian quan sát
Bằng cách nháy chuột lên các nút lệnh thời gian này em có thể đặt lại thời gian như Ngày, Tháng, Năm, Giờ, Phút và Giây. 
Nháy nút để lấy lại trạng thái thời gian hệ thống máy tính.
Bằng cách thay đổi thời gian, em sẽ quan sát và phát hiện được khá nhiều điều thú vị:
Ngày 12 tháng 7: Hiện tượng "đêm trắng" tại điểm cực Bắc của Trái Đất. 
Ngày 12 tháng 12: Hiện tượng "đêm trắng" 
xuất hiện tại điểm cực Nam của Trái Đất, trong khi ở cực Bắc sẽ là "ngày đen".
Củng cố: 20’
GV nhắc lại nội dung bài học.
Cho học sinh thực hành mở xem màn hình chí và thoát khỏi phần mền.
 Cách quan sát qua mở phần mềm.
Học sinh nghe và thực hành trên máy.
Hướng dẫn học ở nhà: 2’
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.
Làm các bài tập còn lại,
Đọc bài mới để giờ sau học.
----------------------------------–:—----------------------------------
TiÕt 39 	Ngµy so¹n 12/01/2010
Tiết 39: TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES
I. MụcTiêu:
HS hiểu được các chức năng chính của phần mềm, sử dụng phần mềm để quan sát thời gian địa phương của các vị trí khác nhau trên trái đất.
Hs có thể tự thao tác và thực hiện một số chức năng chính của phần mềm.
Thông qua phần mềm HS sẽ hiểu biết thêm về thiên nhiên, trái đất, từ đó nâng cao ý thức bảo vệ môi trường sống.
II/ Chuẩn bị:
Gv: phòng máy, bài tập thực hành.
Hs: kiến thức cũ, sgk.
III/ Tiến trình dạy – học:
ổn định lớp:
Sĩ số lớp:	 /	Vắng:
Tên học sinh vắng:
Bài cũ: 
 Hãy nêu cách khởi động, thoát khỏi phần mềm SUN TIMES
Bài mới:
Hoạt động của giáo viên
Hoạy động của học sinh
Cho học sinh đọc thông tin ở SGK
? Em hiểu thế nào về các chức năng khác của phần mềm SUN TIMES?
Vào cuối năm, tháng 11, 12, tháng 1
Khối đen trên bản đồ sẽ che khuất hình ảnh các quốc gia và thành phố. Để không thể hiện các vùng tối-sáng này, hãy vào bảng chọn Options ® Maps và huỷ chọn tại mục Show Sky Color. Khi đó bản đồ thế giới với các múi giờ sẽ có dạng sau:
Để thay đổi trạng thái thay đổi thông tin này, em hãy thực hiện lệnh Options ® Maps và huỷ chọn tại mục Hover Update. Khi đó thông tin thời gian chỉ thay đổi nếu nháy chuột tại địa điểm nào đó.
Một chức năng nữa của phần mềm là cho phép tìm các địa điểm khác nhau trên Trái Đất có thông tin thời gian trong ngày giống nhau. 
Ví dụ, có thể xem hôm nay có những địa điểm nào trên thế giới có cùng thời gian Mặt Trời mọc như ở Hà Nội, Việt Nam. Các bước thực hiện:
1. Chọn vị trí ban đầu (Hà Nội).
2. Thực hiện lệnh Options ® Anchor Time To và chọn mục Sunrise để tìm theo thời gian Mặt Trời mọc (hoặc Sunset - Mặt Trời lặn).
Với phần mềm Sun Times em có thể biết được các thời điểm xảy ra nhật thực trong tương lai cũng như quá khứ tại một địa điểm trên Trái Đất. 
Nháy nút Find (Future) để tìm nhật thực trong tương lai hoặc nút Find (Past) để tìm nhật thực trong quá khứ. Em sẽ thấy thời gian chuyển động (đến tương lai hay quay lại quá khứ) và sẽ dừng lại nếu tìm thấy nhật thực.
Trong ví dụ trên, ta thấy tại Hà Nội sẽ xảy ra nhật thực một phần vào 17 giờ 58 phút 17 giây trong ngày 01 tháng 8 năm 2008. Cửa sổ Eclipse hiện rõ hình ảnh nhật thực quan sát được từ Hà Nội.
Phần mềm có một chức năng đặc biệt cho phép thời gian chuyển động với vận tốc nhanh hoặc chậm. Em có thể quan sát sự chuyển động của ngày và đêm tại các vùng khác nhau của Trái Đất. 
Hãy quan sát các nút lệnh sau trên thanh công cụ:
4. Một số chức năng khác
a) Hiện và không hiện hình ảnh bầu trời theo thời gian
Để hiển thị màu của bầu trời em cần chọn lại Show Sky Color bằng lệnh Options ® Maps. 
b) Cố định vị trí và thời gian quan sát
c) Tìm các địa điểm có thông tin thời gian trong ngày giống nhau
Ngày 5 tháng 8 năm 2008, các địa điểm trên đường liền này sẽ có thời gian Mặt Trời mọc giống như tại Hà Nội, Việt Nam, vào lúc 5 giờ 31 phút 56 giây.
Ngày 4 tháng 11 năm 2008, các vị trí trên đường liền này sẽ có thời gian Mặt Trời mọc giống như tại Hà Nội, Việt Nam, vào lúc 6 giờ 0 phút 44 giây.
d) Tìm kiếm và quan sát nhật thực trên Trái Đất
Cách thực hiện như sau:
1. Chọn địa điểm muốn tìm nhật thực.
2. Thực hiện lệnh View ® Eclipse. 
Cửa sổ nhỏ sau đây xuất hiện.
Trong hình trên, tại Madrid thủ đô Tây Ban Nha sẽ xảy ra nhật thực một phần vào 9 giờ 30 phút 43 giây sáng ngày 4 tháng 6 năm 2011.
e) Quan sát sự chuyển động của thời gian
Để thời gian chuyển động hãy nháy chuột vào nút . Muốn dừng hãy nháy chuột vào nút . 
Củng cố:
GV nhắc lại nội dung bài học.
Cho học sinh thực hành mở xem màn hình chí và thoát khỏi phần mền.
 Cách quan sát qua mở phần mềm.
Học sinh nghe và thực hành trên máy.
Hướng dẫn học ở nhà:	2’
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.
Làm các bài tập còn lại,
Đọc bài mới để giờ sau học.
----------------------------------–:—----------------------------------
TiÕt 40 	 Ngµy so¹n 12/01/2010
----------------------------------–:—----------------------------------
TiÕt 41: 	Ngµy so¹n 20/01/2010
 CÂU LỆNH LẶP
1. Mục tiêu:
a. Kiến thức:
 - Biết nhu cầu cần có cấu trúc lặp trong ngôn ngữ lập trình.
- Biết ngôn ngữ lập trình dùng cấu trúc lặp để chỉ dẫn máy tính thực hiện lặp đi lặp lại công việc nào đó một số lần.
b. Kỹ năng:
- Hiểu hoạt động của câu lệnh với số lần biết trước for...do trong Pascal.
c. Thái độ:
- Yêu thích môn học, nghiêm túc trong giờ học.
2. Chuẩn bị của giáo viên và học sinh:
a. Chuẩn bị của giáo viên: 
- Giáo án, phòng máy, máy chiếu, phần mềm Pascal.
b. Chuẩn bị của học sinh:
- Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy
a. Kiểm tra bài cũ: Không KT
b. Dạy nội dung bài mới:
HOẠT ĐỘNG CỦA THẦY VÀ TRÒ
NỘI DUNG KIẾN THỨC
GV: Nêu một số công việc thường ngày trong cuộc sống
Trong cuộc sống hằng ngày, nhiều hoạt động được thực hiện lặp đi lặp lại nhiều lần.
Có những hoạt đ ... Ën dông vµo ®Ó viÕt ®­îc nh÷ng ch­¬ng tr×nh ®¬n gi¶n
Cã kü n¨ng thµnh th¹o thùc hiÖn m¸y tÝnh vµ viÕt ch­¬ng tr×nh trªn m¸y tÝnh.
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¹t ®éng cña häc sinh
Gi¸o viªn cho häc sinh «n l¹i lý thuyÕt
Theo s¸ch gi¸o khoa.
(Häc sinh vÒ nhµ tù «n)
Häc sinh thùc hiÖn theo yªu cÇu cña häc ghi¸o viªn
¤n bµi tËp vËn dông:
Khoanh troøn chöõ caùi ñöùng tröôùc keát quaû ñuùng
Caâu 1: Phaùt bieåu naøo sau ñaây laø ñuùng ?
Caáu truùc laëp ñöôïc söû duïng ñeå chæ thò cho maùy tính thöïc hieän laëp laïi moät vaøi hoaït ñoäng naøo ñoù cho ñeán khi moät ñieàu kieän naøo ñoù ñöôïc thoaû maõn.
Chæ ngoân ngöõ laäp trình Pascal môùi coù caùc caâu leänh laëp ñeå theå hieän caáu truùc laëp.
Ngoân ngöõ Pascal theå hieän caáu truùc laëp vôùi soá laàn laëp cho tröôùc baèng caâu leänh whiledo
Ngoân ngöõ Pascal theå hieän caáu truùc laëp vôùi soá laàn laëp chöa bieát tröôùc baèng caâu leänh Fordo
Caâu 2: Leänh laëp naøo sau ñaây laø ñuùng?
For = to do ;
For := to do ;
For := to do ;
For : to do ;
Caâu 3: Caâu leänh pascal naøo sau ñaây laø hôïp leä?
For i:=100 to 1 do writeln(‘A’);	B) For i:=1.5 to 10.5 do writeln(‘A’);
C)	For i= 1 to 10 do writeln(‘A’);	D) For i:= 1 to 10 do writeln(‘A’);
Caâu 4: Voøng laëp while ..do laø voøng laëp:
A) Bieát tröôùc soá laàn laëp	B) Chöa bieát tröôùc soá laàn laëp
C.) Bieát tröôùc soá laàn laëp nhöng giôùi haïn laø =100 
Caâu 5: Caâu leänh laëp whiledo coù daïng ñuùng laø:
A) While do; ; 	B) While do;
C) While do ;	D) While do ;
Caâu 6: Cho S vaø i laø bieán nguyeân. Khi chaïy ñoaïn chöông trình :
 s:=0;
 for i:=1 to 5 do s := s+i;
 writeln(s);
 Keát quaû in leân maøn hình laø cuûa s laø : 
	A.11 	B. 55 	C. 101	D.15
Caâu 7: Trong chöông trình pascal sau ñaây:
 Var x : integer ;
Begin
X:= 3 ; 
	If (45 mod 3) =0 then x:= x +2;
	If x > 10 then x := x +10 ;
End.
X coù giaù trò laø maáy
	a) 3	b) 5	c) 15	d)10
Caâu 8: Trong chöông trình pascal sau ñaây:
 program hcn;
var a, b :integer;
	s,cv :real ;
begin
	a:= 10;
	b:= 5;
s:= a*b ;
	cv:= (a +b ) * 2 ;
writeln(‘dien tich hcn la:’ , s );
writeln( ‘chu vi hcn la : ‘ , cv ) ;
	readln;
end.
Bieán s vaø cv coù giaù trò laø maáy:
	a/ s = 10 ; cv = 5 ;	b/ s= 30 ; cv = 50 ; 
	c/ s = 50 ; cv = 40 ; 	d/ s = 50 ; cv = 30 ;
Cñng cè:
Gi¸o viªn hÖ thèng l¹i toµn bé néi dung bµi häc.
Yªu cÇu häc sinh nh¾c l¹i bµi
H­íng dÉn vÒ nhµ:
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.
Häc kÜ lÝ thuyÕt, viÕt ch­¬ng tr×nh tÝnh t«ng 100 sè tù nhiªn, N sè tù nhiªn ®Çu tiªn.
Lµm c¸c bµi tËp cßn l¹i,
§äc bµi míi ®Ó giê sau häc.
-----------------o0o-----------------
Ngµy so¹n :	
Ngµy d¹y : 8A :	8B :	8C: 	 8D:
TiÕt 69: «n tËp
I/ Môc tiªu:
Cñng cè l¹i toµn bé kiÕn thøc ®· ®­îc häc tõ bµi 5 ®Õn bµi 9 vµ phÇn mÒm häc tËp ë häc kú 2.
Thùc hiÖn lµm c¸c bµi tr¾c nghiÖm. VËn dông vµo ®Ó viÕt ®­îc nh÷ng ch­¬ng tr×nh ®¬n gi¶n
Cã kü n¨ng thµnh th¹o thùc hiÖn m¸y tÝnh vµ viÕt ch­¬ng tr×nh trªn m¸y tÝnh.
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¹t ®éng cña häc sinh
¤n bµi tËp cñng cè kiÕn thøc:
Caâu 9: Sau khi thöïc hieän ñoaïn chöông trình j:= 0; for i:= 1 to 3 do j:=j+2; thì giaù trò in ra maøn hình laø?
	a) 4	b) 6	c) 8	d)10
Caâu 10: Ñeå tính toång S=1+3 + 5 +  + n; em choïn ñoaïn leänh:
a) for i:=1 to n do
	if ( i mod 2)=0 then S:=S + 1/i;
for i:=1 to n do
if ( i mod 2) 0 then S:=S + i;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i 
	Else S:= S + I; 
for i:=1 to n do
if ( i mod 2)=0 then S:=S + i;
Caâu 11: Ñeå tính toång S=1/2+1/4 + 1/6 +  +1/ n; em choïn ñoaïn leänh:
a) for i:=1 to n do
	if ( i mod 2)=0 then S:=S + 1/i;
c) for i:=1 to n do
if ( i mod 2) 0 then S:=S + i;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S – 1/i 
	Else S:= S + 1/i; 
d) for i:=1 to n do
if ( i mod 2)=0 then S:=S +1/ i
Else S:=S-1/i;
Caâu 12: Ñeå tính toång S=1+1/3 + 1/5 +  +1/ n; em choïn ñoaïn leänh:
a) for i:=1 to n do
	if ( i mod 2)=1 then S:=S + 1/i;
c) for i:=1 to n do
if ( i mod 2) =0 then S:=S + 1/i;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S + 1/i 
	Else S:= S + 1/; 
 d) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i;
Caâu 13: Ñeå ñeám coù bao nhieâu soá leû nhoû hôn hay baèng n ; em choïn ñoaïn leänh:
a) for i:=1 to n do
	if ( i mod 2)0 then S:=S + 1;
c) for i:=1 to n do
if ( i mod 2) =0 then S:=S + 1;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i ;
d) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i;
Caâu 14: Ñeå tính toång S=1+2+3+ 4+ 5 +  + n; em choïn ñoaïn leänh:
a) s:=0; i:=0;
 While i<=n do 
	S:=S + 1;
a) s:=0; i:=0;
 While i<=n do 
If (I mod 2)= 1 Then S:=S + i;
b) s:=0; i:=0;
 While i<=n do 
 begin	
S:=S + i;
I:=i+1;
	End;
d) s:=0; i:=0;
 While i<=n do 
 begin	
if (i mod2)=1 Then S:=S + i;
Else i:=i+1;
	End;
Caâu 15: Caâu leänh naøo sau ñaây laëp voâ haïn laàn
a) s:=5; i:=0;
 While i<=s do 
	s:=s + 1;
a) s:=5; i:=1;
 While i<=s do 
i:=i + 1;
b) s:=5; i:=1;
 While i> s do 
 i:=i + 1;
d) s:=0; i:=0;
 While i<=n do 
 begin	
if (i mod2)=1 Then S:=S + i;
Else i:=i+1;
	End;
Caâu 16: Choïn khai baùo hôp leä
a) Var a,b: array[1..n] of real;
c) Var a,b: array[1:n] of real;
b) Var a,b: array[1..100] of real;
d) Var a,b: array[1n] of real;
Caâu 27: Choïn khai baùo hôp leä
a) Const n=5;
	Var a,b: array[1..n] of real;
c) Var n: real;
	Var a,b: array[1:n] of real;
b) Var a,b: array[100..1] of real;
d) Var a,b: array[1..5..10] of real;
Caâu 17: Choïn khai baùo hôp leä
a) Const n=5;
	Var a,b: array[1..n] of integer;
c) Var n: real;
	Var a,b: array[1:n] of real;
b) Var a,b: array[100..1] of integer;
d) Var a,b: array[1..5..10] of integer;
Caâu 18: Laàn löôït thöïc hieän ñoaïn leänh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; 
 Giaù trò cuûa t laø
	a) t=1	b) t=3 	c) t=2	d) t=6
Cñng cè:
Gi¸o viªn hÖ thèng l¹i toµn bé néi dung bµi häc.
Yªu cÇu häc sinh nh¾c l¹i bµi
H­íng dÉn vÒ nhµ:
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.
Häc kÜ lÝ thuyÕt, viÕt ch­¬ng tr×nh tÝnh t«ng 100 sè tù nhiªn, N sè tù nhiªn ®Çu tiªn.
Lµm c¸c bµi tËp cßn l¹i vµ «n l¹i toµn bé kiÕn thøc ®Ó giê sau kiÓm tra häc kú 2
-----------------o0o-----------------
Ngµy so¹n :	
Ngµy d¹y : 8A :	8B :	8C: 	 8D:
TiÕt 70: kiÓm tra häc kú 2
I/ Môc tiªu:
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¹t ®éng cña häc sinh
GV ph¸t ®Ò cho häc sinh
Theo däi HS lµm bµi
Thu bµi cña häc sinh
Häc sinh lµm bµi d­íi sù theo dâi cña GV
Tr¶ bµi khi hÕt giê vµ thùc hiÖn c¸c h­íng dÉn cña GV
Hä teân: 
Lôùp: 8
ÑEÀ KIEÅM TRA HOÏC KYØ 2 NAÊM HOÏC 2008 – 2009
 Moân: Tin hoïc 8 (Thôøi gian 45 phuùt)
A/ LYÙ THUYEÁT:
I/ Traéc nghieäm khaùch quan: 
	Khoanh troøn chöõ caùi ñöùng tröôùc keát quaû ñuùng .
Caâu 1: Leänh laëp naøo sau ñaây laø ñuùng?
For = to do ;
For := to do ;
For := to do ;
For : to do ;
Caâu 2: Voøng laëp while ..do laø voøng laëp:
A) Chöa bieát tröôùc soá laàn laëp B) Bieát tröôùc soá laàn laëp
C.) Bieát tröôùc soá laàn laëp nhöng giôùi haïn laø =100
Caâu 3: Caâu leänh laëp whiledo coù daïng ñuùng laø:
A) While do; ; 	 B) While do;
C) While do ;	 D) While do ;
Caâu 4: Cho S vaø i laø bieán nguyeân. Khi chaïy ñoaïn chöông trình :
 s:=0;
 for i:=1 to 5 do s := s+2;
 writeln(s);
 Keát quaû in leân maøn hình laø cuûa s laø : 
	A.11 	B. 55 	C. 12	D.13
Caâu 5: Laàn löôït thöïc hieän ñoaïn leänh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; 
 Giaù trò cuûa t laø
	 A) t=1	 B) t=2	C) t=3	 D) t=6
Caâu 6: Caâu leänh pascal naøo sau ñaây laø hôïp leä?
For i:= 1 to 10 do writeln(‘A’);	 B) For i:=1.5 to 10.5 do writeln(‘A’);
 C) For i= 1 to 10 do writeln(‘A’);	 D) For i:=100 to 1 do writeln(‘A’);
II/ Töï luaän:
	Vieát chöông trình Pascal söû duïng bieán maûng ñeå nhaäp töø baøn phím caùc phaàn töû cuûa moät daõy soá. Ñoä daøi cuûa daõy cuõng ñöôïc nhaäp töø baøn phím.
BAØI LAØM:
Hä teân: 
Lôùp: 8 
ÑEÀ KIEÅM TRA HOÏC KYØ 2 NAÊM HOÏC 2008 – 2009
Moân: Tin hoïc 8 (Thôøi gian 45 phuùt)
B/ THÖÏC HAØNH:
	Viết chương trình nhập điểm của các bạn trong lớp. Sau đó in ra màn hình số bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém (theo tiêu chuẩn từ 8.0 trở lên đạt loại giỏi, từ 6.5 đến 7.9 đạt loại khá, từ 5.0 đến 6.4 đạt trung bình và dưới 5.0 xếp loại kém).
 a) Liệt kê các biến dự định sẽ sử dụng trong chương trình. Tìm hiểu phần khai báo dưới đây và tìm hiểu tác dụng của từng biến:
program Phanloai;
uses crt;
Var
 i, n, Gioi, Kha, Trungbinh, Kem: integer;
 A: array[1..100] of real;
Gõ phần khai báo trên vào máy tính và lưu tệp với tên Phanloai. Tìm hiểu các câu lệnh trong phần thân chương trình dưới đây:
Begin
clrscr;
write(‘Nhap so cac ban trong lop, n = ‘); readln(n);
writeln(‘Nhap diem:’);
For i:=1 to n do Begin write(i,’. ‘); readln(a[i]); End;
Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0;
for i:=1 to n do
 begin 
if a[i]>=8.0 then Gioi:=Gioi+1;
if a[i]<5 then Kem:=Kem+1;
if (a[i]=6.5) then Kha:=Kha+1;
if (a[i]>=5) and (a[i]<6.5) then Trungbinh:=trungbinh+1
 end;
writeln(‘Ket qua hoc tap:’);
writeln(Gioi,’ ban hoc gioi’);
writeln(Kha,’ ban hoc kha’);
writeln(Trungbinh,’ ban hoc trung binh’);
writeln(Kem,’ ban hoc kem’);
readln
End.
Gõ tiếp phần chương trình này vào máy tính sau phần khai báo. Dịch, chạy chương trình.
HÖÔÙNG DAÃN CHAÁM – THANG ÑIEÅM.
A/ LYÙ THUYEÁT (10 ÑIEÅM)
I/ Traéc nghieäm khaùch quan: (3 ñieåm)
	Moãi caâu ñuùng cho 0,5 ñieåm
Caâu
1
2
3
4
5
6
Ñaùp aùn
B
A
D
C
D
A
II/ Töï luaän: (7 ñieåm)
Program nhap_so_phan_tu_cu_mang;	
Uses Crt;
var N, i: integer;
 A: array[1..100] of real;
2.0
Begin
Clrscr;
write('Nhap so phan tu cua mang, n= ',n);
2.0
for i:=1 to n do
write('Nhap gia tri ',i,'cua mang, a[',i,']= ');
2.0
 Readln;
end.
1.0
B/ THÖÏC HAØNH
Laøm duùng cho 10 ñieåm
C/ CAÙCH TÍNH ÑIEÅM CUÛA BAØI
Laøm troøn ñeán phaàn möôøi
Tính theo coâng thöùc sau: ÑTB cuûa baø = (Ñieåm LT x 2 + Ñieåm TH) : 3
Cñng cè:
Gi¸o viªn nhËn xÐt giê kiÓm tra
H­íng dÉn vÒ nhµ:
 - Xem l¹i toµn bÞ ch­¬ng tr×nh tin 8. Trong hÌ th­êng xuyªn «n l¹i