Đang tải... (xem toàn văn)
Kiến thức Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước.. Kỹ năng Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh.[r]
(1)Giáo án tin học lớp Năm học: 2009 – 2010 Ngày soạn: Ngày giảng: Tiết 52 Bài thực hành 6: Sử dụng lệnh lặp while (t2) I - MỤC TIÊU Kiến thức Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước Kỹ Rèn luyện khả đọc chương trình, tìm hiểu tác dụng và kết hợp các câu lệnh Thái độ: Nghiêm túc II CHUẨN BỊ Giáo viên: giáo án, máy chiếu Học sinh: Kiến thức cũ, sách, III - PHƯƠNG PHÁP - Thuyết trình, giảng giải, vấn đáp IV - TIẾN TRÌNH LÊN LỚP - ỔN ĐỊNH (1’) - KIỂM TRA BÀI CŨ (3’) - Hãy cho số ví dụ lặp với số lần chưa biết trước - BÀI MỚI (38’) HOẠT ĐỘNG CỦA THẦY VÀ TRÒ GV: Đưa bài tập SGK ? Gọi học sinh nêu ý tưởng - GV hướng dẫn HS: Làm bài tập NỘI DUNG KIẾN THỨC Bài Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải là số nguyên tố hay không Ý tưởng: Kiểm tra N có chia hết cho các số tự nhiên ≤ i ≤ N hay không Kiểm tra tính chia hết phép chia lấy phần dư (mod) a) Đọc và tìm hiểu ý nghĩa câu lệnh chương trình sau đây: Uses Crt; Var n,i:integer; Begin Clrscr; write('Nhap vao mot so nguyen: ');readln(n); If n<=1 then writeln('N khong la so nguyen to') GV: Trần Hữu Quyết Trường: PTDT nội trú Ngân Sơn Lop8.net (2) Giáo án tin học lớp Năm học: 2009 – 2010 else begin i:=2; while (n mod i<>0) i:=i+1; if i=n then writeln(n,' la so nguyen to!') else writeln(n,' khong phai la so nguyen to!'); end; readln end b) Gõ, dịch và chạy thử chương trình với vài độ chính xác khác - CỦNG CỐ (3’) - Hiểu các hoạt động lặp với số lần chưa biết trước - Biết sử dụng câu lệnh while - HƯỚNG DẪN VỀ NHÀ (2’) - Về nhà hoàn thành các bài tập SGK, tiết sau là tiết bài tập IV RÚT KINH NGHIỆM : ………………………………………………………………………………………………… ………………………………………………………………………………………………… ………………………………………………………………………………………………… ********** GV: Trần Hữu Quyết Trường: PTDT nội trú Ngân Sơn Lop8.net (3)