Giáo án Tin học khối 8 - Trường THCS Lê Hồng Phong - Tiết 69: Kiểm tra thực hành 1 tiết

Ngày soạn: 19/4/2017 Ngày dạy: Lớp 8,E,C: 25 /4/2017 +Lớp 8B,D,A: 26/4/2017 KIỂM TRA THỰC HÀNH 1 TIẾT Tuần 35 Tiết 69 Mục tiêu: - Đánh giá kiến thức, kĩ năng của HS về: Ngôn ngữ lập trình, cấu trúc chung của chương trình, cách đặt tên trong chương trình, các phép toán được dùng trong Pascal, các lệnh cơ bản của ngôn ngữ lập trình Pascal. Học sinh biết vận dụng câu lệnh lặp , câu lệnh điều kiện Yêu cầu của đề * Kiến thức: Kiểm tra kiến thức Ngôn ngữ lập trình, cấu trúc chung của chương trình, cách đặt tên trong chương trình, các phép toán được dùng trong Pascal, các lệnh cơ bản của ngôn ngữ lập trình Pascal. * Kiểm tra thực hành trên máy tính * Kiểm tra sau khi đã học xong Bài thực hành số 6. III. TIẾN TRÌNH BÀI DẠY ĐỀ KIỂM TRA Câu 1. Viết chương trình tính điểm trung bình n môn học của một học sinh và điểm các môn học được nhập từ bàn phím (sử dụng biến mảng). Lưu tên file: TÊN_LỚP.PAS Đáp án:- học sinh hoàn thành chương trình nhanh nhất và chạy đúng kết quả đat 10đ - những hs không hoàn thành chương trình thì chấm từng phần như sau +tên chương trình: 1đ + khai báo: 2 đ +nhập số môn học:2 đ +nhập điểm: 2đ + tính trung bình và in kết quả: 3 điểm Program trung_binh; Uses crt; Var n, i : integer; Tb : real; Diem : array[1..20] of real; Begin Clrscr; Write(‘Nhap so mon hoc N = ‘); Readln(n); For i := 1 to n do Begin Write(‘Diem mon ‘,i,’ la = ‘); readln(Diem[i]); End; Tb := 0; For i : = 1 to n do tb := tb + Diem[i]; Tb := tb/n; Writeln(‘Diem trung binh cua hoc sinh la: ‘,tb:3:2); Readln; End.