Giáo án tin học lớp 8 Bài 7: CÂU LỆNH LẶP (tt) I. Mục tiêu :  Hiểu hoạt động của câu lệnh với số lần biết trước for do trong Pascal.  Viết đúng được lệnh for do trong một số tình huống đơn giản.  Hiểu lệnh ghộp trong Pascal  Thái độ nghiêm túc cẩn thận. II. Chuẩn bị  Gv: Soạn giáo án SGK, SBT  HS: Vở ghi, SGK, SBT, đọc trước nội dung bài học. III. Hoạt động dạy học 1. Ổn định tổ chức lớp : - Kiển tra sĩ số : - Ổn định trật tự : 2. Kiểm tra bài cũ : Em hãy cho ví dụ về hoạt động được thực hiện lặp lại trong cuộc sống hằng ngày 3. Dạy bài mới : Hoạt động 1 : Ví dụ về câu lệnh lặp : Gv: minh họa bẳng ngụn ngữ Pascal cỳ phỏp cõu lệnh for … to … do  Lưu ý cho hs: - biến đếm là biến đơn có kiểu nguyên; - giá trị đầu và giá trị cuối là các biểu Cú pháp câu lệnh lặp với số lần biết trước trong Pascal. for<biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh> trong đó: for, to, do là các từ khóa Vd 1: Chương trình in ra màn hình thứ tự lần lặp. thức có cùng kiểu với biến đếm và giá trị cuối phải lớn hơn giá trị đầu; Ccâu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép. Cho hs nhận xét và so sánh sự khác nhau ở câu var i:integer; begin for i:= 1 to 20 do writeln(‘Day la lan lap thu’,i); readln; end. Vd2: Chương trình ghi nhận vị trớ 10 chữ O rơi từ trên xuống. ues crt; var i:integer; begin lệnh lập trong hai ví dụ trên Gv: Giải thích cho học tại sao vd2 trong câu lệnh lặp cú begin … end ; clrscr; for i:= 1 to 20 do begin writeln(‘O’); delay(200); end; readln; end. *Lưu ý: Câu lệnh có sử dụng câu lệnh ghộp thì phải đặt trong hai từ khóa begin … end; Hoạt động 2 : Tính tổng và tích bằng câu lệnh lặp Gv: Trình bày đoạn chương trình tính tổng N số tự nhiên với N là số tự nhiênđược nhập từ bàn phím (Pascal) Theo cụng thức tính tổng ta cần khai bao nhieu biến? kiểu biến? Trong 2 biến thìbiến nào ó giá trị được nhập từ bàn phím? Vd 1: chương trính tính tổng N số tự nhiờn đầu tiên, với N là số tự nhiên được nhập từ bàn phím. S = 1+2+3+ … + N program Tinh_tong; var N,i:integer; S:longint; begin write(‘Nhap so N = ‘); readln(N); S:= 0; for i:= 1 to N do Trong trường hợp dữ liệu có kiểu nguyên rất lớn ta dùng longint Hoạt động 3 : Củng cố: 1/ Cấu trúc lặp trong chương trình dựng để S:= S+i; writeln(‘Tong cua’, N, ‘so tư nhien dau tien S = ‘, S); readln; end. *Kiểu longint cú phạm vi từ -2 31 đến 2 31 – 1. Vd 2: chương trình tính tích N số tự nhiên , với N là số tự nhiên được nhập từ bàn phím. N! = 1.2.3….N program Tinh_Giai_Thua; var N,i:integer; làm gì ? 2/ Trong ngôn ngữ lập trình Pascal cấu trúc lặp với số lần lặp cho trước được thể hiện với câu lệnh nào? P:longint; begin write(‘Nhap so N = ‘); readln(N); P:= 1; for i:= 1 to N do P:= P*i; writeln( N, ‘! = ‘, P); readln; end. . Giáo án tin học lớp 8 Bài 7: CÂU LỆNH LẶP (tt) I. Mục tiêu :  Hiểu hoạt động của câu lệnh với số lần biết trước for do trong Pascal.  Viết đúng được lệnh for do trong. lần lặp. thức có cùng kiểu với biến đếm và giá trị cuối phải lớn hơn giá trị đầu; Ccâu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép. Cho hs nhận xét và so sánh. end; readln; end. *Lưu ý: Câu lệnh có sử dụng câu lệnh ghộp thì phải đặt trong hai từ khóa begin … end; Hoạt động 2 : Tính tổng và tích bằng câu lệnh lặp Gv: Trình bày đoạn chương