Bài giảng Môn Tin học lớp 8 - Tiết 61: Kiểm tra thực hành
Câu 2: (2đ)
Program CT;
Var a: Integer;
Begin
Write( Hay nhap gia tri cua a = ); Readln(a);
While (a < 1) or (a > 100) do
Begin
Write(Hay nhap lai a); Readln (a);
End;
Readln
End.
Ngµy d¹y: / / 2009 TiÕt 61: KiĨm tra thùc hµnh Mơc tiªu : Häc xong bµi nµy, häc sinh cã kh¶ n¨ng : 1. KiÕn thøc: Biết được các tình huống sử dụng từng loại lệnh lặp. Biết được khái niệm mảng 1 chiều kiểu dữ liệu số, cách khai báo mảng, truy cập các phần tử của mảng. 2. Kü n¨ng: Viết đúng lệnh lặp với số lần biết trước. Thực hiện được khai báo mảng kiểu dữ liệu số, truy cập phần tử mảng, sử dụng các phần tử của mảng trong biểu thức tính toán. 3. Th¸i ®é: Nghiªm tĩc lµm bµi kiĨm tra, ý thøc tËp trung cao ®é; ph¸t huy hÕt kh¶ n¨ng, vèn kiÕn thøc. ChuÈn bÞ : GV : Gi¸o ¸n, tµi liƯu tham kh¶o, phßng m¸y. HS : Häc, «n tËp ch¬ng, bµi. TiÕn tr×nh lªn líp §Ị kiĨm tra: 40' Câu 1: (4đ) a) Gõ chương trình sau: b) Sửa lỗi và chạy chương trình trên. Câu 2: (2đ) Hãy viết các câu lệnh Pascal yêu cầu người sử dụng nhập một số nguyên nằm trong khoảng từ 1 đến 100 và yêu cầu nhập lại nếu số không thoả mãn. Câu 3: (4đ) Viết chương trình tính tổng sau với n là số tự nhiên được nhập từ bàn phím: Thang ®iĨm vµ ®áp án: Câu 1: (4đ) a/ Gõ đúng nội dung 2 điểm b/ Sửa lỗi 2 điểm Lỗi khai báo đặt sai vị trí (1đ) Lỗi thiếu từ khoá do (1đ) Câu 2: (2đ) Program CT; Var a: Integer; Begin Write(‘ Hay nhap gia tri cua a = ‘); Readln(a); While (a 100) do Begin Write(‘Hay nhap lai a’); Readln (a); End; Readln End. Câu 3: (4đ) Khai báo (0.5đ) Viết câu lệnh nhập dữ liệu (0.5đ) Dùng câu lệnh gán (0.5đ) Sử dụng câu lệnh lặp (1.5đ) Xuất kết quả đúng (1đ) Tỉng kÕt ®¸nh gi¸: KiĨm tra ®¸nh gi¸ NhËn xÐt vỊ giê kiĨm tra, Gi¶i ®¸p th¾c m¾c vỊ bµi tËp. Nªu nh÷ng sai sãt thêng gỈp trong khi lµm bµi. HDVN Học thuộc bài, làm bài tập. Về nhà đọc bài đọc thêm Xem trước bài
File đính kèm:
- tiet 61.doc