- Biết nhu cầu cần cú cấu trỳc lặp trong ngụn ngữ lập trỡnh.
3. Vớ dụ về cõu lệnh lặp (18’)
(18’)
- Cỳ phỏp: For <biến
đếm>:= <giỏ trị đầu> to <giỏ trị cuối> do <cõu lệnh>; + 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. Vớ dụ 3: Chương trỡnh sau sẽ in ra màn hỡnh thứ tự lần lặp.
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
Writeln(‘nhap so 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
Học sinh chỳ ý lắng nghe => ghi nhớ kiến thức.
Program tinh_giai_thua; Var N,i: Integer;
P: Longint; Begin
Write(‘N =’); readln(N); P:=1;
For i:=1 to N do P:=P*i; Wirteln(N,’!=’,P); Readln; End. Program lap; Var i: integer; Begin For i:= 1 to 10 do
Writeln(‘day la lan lap thu’,i); Readln; End. 4. Tớnh tổng và tớch bằng cõu lệnh lặp (20’) 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
Writeln(‘nhap so 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 c. Củng cố luyện tập (5’)
? Hĩy nờu cỳ phỏp và hoạt động của vũng lặp khụng xỏc định For..do. ! Cỳ phỏp:
For <biến đếm>:= <giỏ trị đầu> to <giỏ trị cuối> do <cõu lệnh>; + 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.
- 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.
d. Hướng dẫn HS tự học ở nhà (2’)
- Về nhà học bài kết hợp sỏch giỏo khoa chuẩn bị tiết sau làm bài tập - Làm cỏc bài tập 4, 5 SGK.
- ễn lại nội dung đĩ học chuẩn bị cho tiết Bài tập.
---
Ngày soạn: 14/01/2011 Ngày giảng:
Giảng lớp 8A: 17/01/2011 Giảng lớp 8B: 19/01/2011 Tiết 41 BÀI TẬP 1. Mục tiờu a. Về kiến thức - Sử dụng cỏc kiến thức đĩ học để làm một số bài tập b. Về kĩ năng
- Rốn luyện kĩ năng sử dụng cỏc cõu lệnh trong Pascal
c. Về thỏi độ
- Thỏi độ học tập nghiờm tỳc, yờu thớch mụn học.
2. Chuẩn bị của GV và HS
a. Chuẩn bị của GV
- SGK, SGV, SBT, tài liệu, Giỏo ỏn
- Đồ dựng dạy học như mỏy tớnh, projector,...
b. Chuẩn bị của HS
- Đọc trước bài học
- Học thuộc kiến thức lý thuyết
3.Tiến trỡnh dạy học
a. Kiểm tra bài cũ :
Kết hợp trong bài học
Đặt vấn đề
Trong bài học trước chỳng ta đĩ được học về cõu lệnh lặp. Bài học hụm nay chỳng ta sẽ đi giải một số bài tập về Cõu lệnh lặp
b. Giảng nội dung bài mới
Hoạt động của GV Hoạt động của HS Nội dung ghi bảng
+ Hoạt động 1: Bài tập 1. - Sau khi thực hiện đoạn chương trỡnh sau, giỏ trị của biến j bằng bao nhiờu ? J:= 0;
For i:= 1 to 5 do + Sau khi thực hiện đoạn chương trỡnh trờn, giỏ trị