I. MỤC TIÊU:
1. Kiến thức:
- Biết được cứ pháp và hoạt động của vòng lặp xác định For..do
- Biết sử dụng vòng lặp For..do để viết một số chương trình.
2. Kĩ năng:
- Rèn luyện kỹ năng sử dụng vòng lặp để làm bài tập
3. Thái độ:
- Thái độ học tập nghiêm túc, yêu thích môn học.
4. Năng lực hướng tới:
- Hình thành năng lực sử dụng công nghệ thông tinvà truyền thông, năng lực giải quyết vấn đề dựa trên tin học, năng lực tự học.
II. CHUẨN BỊ:
+ Giáo viên: Giáo án,SGK, tài liệu tham khảo.
+ Học sinh: Vở ghi và sách giáo khoa, chuẩn bị bài ở nhà.
III. HOẠT ĐỘNG DẠY - HỌC:
1. Ổn định lớp
2. Kiểm tra bài cũ: ? Cho một vài 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. Bài mới:
|
Hoạt động của GV |
Hoạt động của HS |
Nội dung |
|
+ Hoạt động 1: Ví dụ về cầu lệnh lặp - Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; - Học sinh quan sát hoạt động của vòng lặp trên sơ đồ khối => nêu hoạt động của vòng lặp. Ví dụ: Chương trình sau sẽ in ra màn hình thứ tự lần lặp. Program lap; Var i: integer; Begin Clrscr; For i:= 1 to 10 do Writeln(‘Day la lan lap thu’,i); Readln; End. + Hoạt động 2: Tìm hiểu tính tổng và tích bằng câu lệnh lặp. Ví dụ 5: Chương trình sau đây sẽ tính tổng N số tự nhiên đầu tiên với N nhập từ bàn phím. Program tinh_tong; Var N,i: Integer; S: longint; Begin Clrscr; Writeln(‘Nhap N =’); Readln(N); S:=0; For i:=1 to N do S:=S+i; Witeln(‘tong la:’,S); Readln; End. - Ví dụ 6: Ta kí hiệu N! là tích N số tự nhiên đầu tiên: N! = 1.2.3…N Yêu cầu học sinh viết chương trình theo sự hướng dẫn của giáo viên. |
+ Học sinh chú ý lắng nghe => ghi nhớ kiến thức. + Hoạt động của vòng lặp: - B1: biến đếm nhận giá trị đầu - B2: Chương trình kiểm tra biểu thức điều kiện, nếu biểu thức điều kiện đúng thì thực hiện câu lệnh. - B3: Biến đếm tự động tăng lên 1 đơn vị và quay lại B2. - B4: Nếu biểu thức điều kiện nhận giá trị sai thì thoát ra khỏi vòng lặp. Học sinh chú ý lắng nghe Học sinh chú ý lắng nghe => ghi nhớ kiến thức. Program tinh_giai_thua; Var N,i: Integer; P: Longint; Begin Clrscr; Write(‘Nhap N =’); readln(N); P:=1; For i:=1 to N do P:=P*i; Wirteln(N,’!=’,P); Readln; End. |
3. Câu lệnh lặp for ... do - Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; 4. Tính tổng và tích bằng câu lệnh lặp: Ví dụ 5: Chương trình sau đây sẽ tính tổng N số tự nhiên đầu tiên với N nhập từ bàn phím. Program tinh_tong; Var N,i: Integer; S: longint; Begin Clrscr; Writeln(‘Nhap N =’); Readln(N); S:=0; For i:=1 to N do S:=S+i; Witeln(‘tong la:’,S); Readln; End. - Ví dụ 6: Ta kí hiệu N! là tích N số tự nhiên đầu tiên: N! = 1.2.3…N Program tinh_giai_thua; Var N,i: Integer; P: Longint; Begin Clrscr; Write(‘Nhap N =’); readln(N); P:=1; For i:=1 to N do P:=P*i; Wirteln(N,’!=’,P); Readln; End. |
IV. CỦNG CỐ: (5phút)
? Hãy nêu cú pháp và hoạt động của vòng lặp không xác định For..do.
V. HƯỚNG DẪN VỀ NHÀ: (2phút)
- Về nhà học bài kết hợp sách giáo khoa.
- Làm bài tập 3/59/sgk.
- Đọc phần tìm hiểu mở rộng và bài thực hành 5: Sử dụng lệnh lặp For..... do.
VI. RÚT KINH NGHIỆM:
.......................................................................................................................................
