ĐỀ KIỂM TRA: Thực hiện yêu cầu sau: * Tạo một Folder trên ổ đĩa D với thư mục D:\Tên học sinh_lớp.. Với n là số tự nhiên được nhập vào từ bàn phím.[r]
(1)Ngày soạn: 10/04/2015 Ngày dạy: 23/04/2015 Tuần: 35 Tiết: 70 BÀI KIỂM TRA HỌC KÌ II I MỤC TIÊU ĐỀ KIỂM TRA: Kiến thức: Tổng hợp các kiến thức học kì II Kĩ năng: Vận dụng các kiến thức đã học vào làm bài thi Thái độ: Nghiêm túc quá trình thi học kì II HÌNH THỨC KIỂM TRA: Kết hợp hai hình thức TL (100%) III ĐỀ KIỂM TRA: Thực yêu cầu sau: * Tạo Folder trên ổ đĩa D với thư mục D:\Tên học sinh_lớp * Ví dụ: D:\Ha Biếu_lop8a2 * Sử dụng ngôn ngữ lập trình Pascal viết chương trình sau: Câu 1: (5 điểm) Viết chương trình tính tổng A = + 1/2 + 1/3 + … + 1/n Với n là số tự nhiên nhập vào từ bàn phím Câu 2: (5 điểm) Viết chương trình tính tích 10 số nguyên đầu tiên IV ĐÁP ÁN (hướng dẫn chấm): Phần/câu Phần tự luận: Câu 1: Câu 4: Đáp án chi tiết Program tinh_tong; Uses crt; Var n: integer; i: integer tong: real; BEGIN Clrscr; Write('Cho so tu nhien n: '); Readln(n); tong:= 0; i:= 1; While i <= n Begin tong:= tong + 1/i ; i:= i + ; End ; Writeln ('Tong can tim la: ',tong) ; Readln; END Program tich; Uses crt; Const n=10; Var i: integer; tich: longint; Begin Biểu điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.5 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm (2) Clrscr; tich:=1; i:=1; while i<=n begin tich:=tich*i; i:= i+1; end; writeln(‘tich cua 10 so tu nhien dau tien la= ’,tich); readln; End 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.5 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm 0.25 điểm Thống kê chất lượng: THỐNG KÊ ĐIỂM KIỂM TRA Lớp Tổng số học sinh Điểm >=5 Số lượng Tỷ lệ Điểm từ - 10 Số lượng Tỷ lệ Điểm Số lượng Tỷ lệ Điểm từ - Số lượng Tỷ lệ 8A1 8A2 8A3 V RÚT KINH NGHIỆM: (3)