ma tran de kiem tra tin 8

<span class='text_page_counter'>(1)</span>Ngày soạn: 20/02/2013 Tiết 55 - BÀI KIỂM TRA 1 TIẾT A. MỤC TIÊU 1. Kiến thức - Đánh giá kiến thức của HS qua bài kiểm tra - Vận dụng những kiến thức đã học để làm bài kiểm tra 2. Kỹ năng: Bổ sung những kiến thức cơ bản về lập trình pascal 3. Thái độ: Nghiêm túc làm bài B. CHUẨN BỊ 1. Giáo viê: Bài kiểm tra…. 2. Học sinh: Kiến thức đã học, đồ dùng học tập C. MA TRẬN ĐỀ:. Nhận biết. Mức độ Kiến thức Bài 7 Bài 8. Tổng. TN Số câu 3. TL. Thông Hiểu TN 2. TL. Vận dụng TN. Tổng. 2. TL 1. 8. 1. 1. 1. 4. 3. 3. 2. 12. Điểm Số câu 1 Điểm Câu. 4. Điểm. 10. D. TIẾN TRÌNH BÀI DẠY 1. Tổ chức. Lớp Vắng. 8A. 8B. 8C. 2. Phát đề kiểm tra. đề bài I. Khoanh tròn đáp án đúng Câu 1: Đâu là hoạt động lặp với số lần cha biết trớc? A. Hµng ngµy em ®i häc. B. Mét tuÇn trêng em tæ chøc chµo cê 1 lÇn. C. Ngày em đánh răng ba lần D. Em sẽ đến nhà bà ngoại chơi vào hôm cả bố và mẹ đi vắng..

<span class='text_page_counter'>(2)</span> C©u 2: Có ph¸p cña c©u lÖnh lÆp víi sè lÇn cha biÕt tríc lµ lµ: A. If (§iÒu kiÖn) then (C©u lÖnh); B. For (Biến đếm):=(Giá trị đầu) to (Giá trị cuối) do (câu lệnh); C. While (®iÒu kiÖn) do (c©u lÖnh); D. Var i,n: Integer; C©u 3: Víi ng«n ng÷ lËp tr×nh Pascal c©u lÖnh lÆp: For i:=1 to 10 do x:=x+1; th× biến đếm i phải đợc khai báo là kiểu gì? A. Integer B. Real C. String D. Kiểu nào cũng đợc. C©u 4: Sè vßng lÆp trong c©u lÖnh: For (Biến đếm):=(Giá trị đầu) to (Giá trị cuối) do (câu lệnh); đợc xác định: A. Gi¸ trÞ ®Çu + Gi¸ trÞ cuèi + 1 B. Giá trị đầu + Biến đếm + 1 C. Gi¸ trÞ cuèi - Gi¸ trÞ ®Çu + 1 D. Giá trị cuối – Biến đếm + 1 C©u 5: Trong c©u lÖnh lÆp: For (Biến đếm):=(Giá trị đầu) to (Giá trị cuối) do (câu lệnh); Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm: A. 1 đơn vị B. 2 đơn vị C. 3 đơn vị D. 4 đơn vị C©u 6: H·y cho biÕt c©u lÖnh sau sÏ viÕt ra mµn h×nh c¸i g×? For i:=1 to 3.5 do write(i); A. 1 2 3 B. 1 3.5 C. 3.5 D. Chơng trình không chạy vì giá trị cuối của biến đếm là số thập phân. C©u 7: Sau khi thùc hiÖn ®o¹n ch¬ng tr×nh: j:=0; For i:=1 to 3 do j:= j + 2; write(j); th× gi¸ trÞ in ra mµn h×nh lµ: A. 4 B. 6 C. 8 D. 10 C©u 8: Sau khi thùc hiÖn ®o¹n ch¬ng tr×nh: j:=0;i:=1; while i<=3 do Begin j:=j+2; i:=i+1; End; write(j); th× gi¸ trÞ in ra mµn h×nh lµ: A. 6 B. 8 C. 10 D. 12 C©u 9 §¸nh dÊu (x) vµo « §óng hoÆc Sai t¬ng øng trong c¸c c©u lÖnh Pascal sau. NÕu sai söa l¹i. C©u lÖnh §óng Sai Söa l¹i A. For i:=10 to 1 do x:=x+1; B. For i=1 to 10 do x:=x+1; C©u 10 §¸nh dÊu (x) vµo « §óng hoÆc Sai t¬ng øng trong c¸c c©u lÖnh Pascal sau. NÕu sai söa l¹i. C©u lÖnh C. While x =10 do x=x+1;. §óng. Sai. Söa l¹i.

<span class='text_page_counter'>(3)</span> D. While x:=10 do x:=x+1; C©u 11: H·y gi¶i thÝch c¸c c©u lÖnh cã trong ch¬ng tr×nh sau: 1. Program TinhA; 2. Uses CRT; 3. Var i, n: integer; tong: real; 4. BEGIN 5. Clrscr; 6. write('cho so tu nhien n: '); 7. Readln(n); 8. tong:=0; i:=1; 9. while i<= n do Begin tong:= tong+ 1/i; i: = i+1; End; 10. writeln(' Tong can tim la: ', tong:12:6); 11. Readln; 12. END. C©u 12:ViÕt ch¬ng tr×nh tÝnh tÝch cña N sè tù nhiªn ®Çu tiªn, N nhËp tõ bµn phÝm. 3. Nhận xét rút kinh nghiệm giờ kiểm tra ..................................................................................................................................... ..................................................................................................................................... ..................................................................................................................................... ......................................................................................................................................

<span class='text_page_counter'>(4)</span> ĐÁP ÁN VÀ THANG ĐIỂM A - TRẮC NGHIỆM (Mỗi câu đúng được 0,3 điểm) Câu1 Câu2 Câu3 Câu4 Câu5 Câu6 Câu7 Câu8 D B - TỰ LUẬN. C. A. C. A. D. B. A. C©u 8 §¸nh dÊu (x) vµo « §óng hoÆc Sai t¬ng øng trong c¸c c©u lÖnh Pascal sau. Nếu sai sửa lại. (Mỗi câu đánh dấu đúng vị trí đợc 0,25đ, sửa đúng đợc 0,25 ®) C©u lÖnh. §óng. Sai. Söa l¹i. A. For i:=10 to 1 do x:=x+1;. x. A. For i:=1 to 10 do x:=x+1;. B. For i=1 to 10 do x:=x+1;. x. B. For i:=1 to 10 do x:=x+1;. C©u 9 §¸nh dÊu (x) vµo « §óng hoÆc Sai t¬ng øng trong c¸c c©u lÖnh Pascal sau. Nếu sai sửa lại. (Mỗi câu đánh dấu đúng vị trí đợc 0,25đ, sửa đúng đợc 0,25 đ) C©u lÖnh C. While x =10 do x=x+1;. §óng. Sai x. Söa l¹i C. While x =10 do x:=x+1;. x D. While x=10 do x:=x+1; D. While x:=10 do x:=x+1; C©u 10: H·y gi¶i thÝch c¸c c©u lÖnh cã trong ch¬ng tr×nh sau: (Mçi lÖnh gi¶i thích đúng đợc 0,3 điểm) 1. Khai b¸o tªn ch¬ng tr×nh lµ TinhA 2. Khai b¸o th viÖn Crt 3. Khai b¸o biÕn i,n kiÓu nguyªn, biÕn tong kiÓu thùc 4. B¾t ®Çu th©n ch¬ng tr×nh chÝnh 5. LÖnh xãa mµn h×nh 6. LÖnh in th«ng b¸o “cho so tu nhien n:” 7. LÖnh dõng ch¬ng tr×nh chê ngêi ding nhËp d÷ liÖu tõ bµn phÝm vµ g¸n gi¸ trÞ cho biÕn n 8. LÖnh g¸n gi¸ trÞ ban ®Çu cho biÕn tong:=0 vµ biÕn i:=1; 9. C©u lÖnh lÆp víi ®iÒu kiÖn lÆp lµ i<= n vµ c©u lÖnh lÆp lµ: LÖnh tÝnh tong:= tong+ 1/i; Và lệnh tăng giá trị của biến i lên 1 đơn vị i: = i+1; 10. Lệnh in thông báo “Tong can tim la:”, giá trị tính đợc của biến tổng 11. LÖnh dõng ch¬ng tr×nh xem kÕt qu¶ 12. LÖnh kÕt thóc ch¬ng tr×nh chÝnh. C©u 11:ViÕt ch¬ng tr×nh tÝnh tÝch cña N sè tù nhiªn ®Çu tiªn, N nhËp tõ bµn phÝm. §a th«ng b¸o kÕt qu¶ ra mµn h×nh. Program TinhTong; Uses crt; Var Tich:longint 0,25 ® N,i:integer; 0,25 ® Begin Clrscr;.

<span class='text_page_counter'>(5)</span> Write(‘Nhap N ’); Readln(n); Tich:=1; For i:=1 to n do Tich:=Tich*i; Writeln(‘Tich cua’, n ,’ so tu nhien dau tien la:’ , tich); readln End.. 0,5 ® 0,5 ® 0,5 ® 0,5 ®.

<span class='text_page_counter'>(6)</span>