- Biết nhu cầu cần cú cấu trỳc lặp với số lần chưa biết trước trong ngụn ngữ lập trỡnh.
4. Tớnh tổng và tớch bằng cõu lệnh lặp: Vớ dụ 5: Tớnh tổng của N số tự nhiờn đầu
* HS:
- INPUT: số n
- OUTPUT: Tổng từ 1n
* GV: Mụ tả thuật toỏn, hướng dẫn học sinh cỏch viết thuật toỏn.
* HS: Mụ tả thuật toỏn theo nhúm
* GV: Hướng dẫn, sửa, gợi ý để học sinh viết chương trỡnh cú sử dụng cõu lệnh for…to…do * HS: Viết theo nhúm
* GV: Sửa, chạy thử chương trỡnh trờn mỏy *GV: Giới thiệu kiểu longint: (-231
231-1)
* GV: Yờu cầu học sinh làm nhúm: Xỏc định input và output Mụ tả thuật toỏn
* HS:Làm theo nhúm B1: s1, i0, Nhập n B2: ii+1
B3: Nếu i>n thỡ quay lại B5 B4: sS*i
B5: Xuất tổng tớch S
* GV: Sửa, gợi ý để học sinh sử dụng lệnh FOR…TO…Do để viết chương trỡnh
-HS: Làm việc theo nhúm
*GV: Sửa bài cỏc nhúm, chạy chương trỡnh mẫu * Thuật toỏn: B1: s0, i0, Nhập n B2: ii + 1 B3: Nếu i > n thỡ quay B5 B4: s S + i B5: Xuất tổng S Program bai1;
Var n, i:integer; s:longint; Begin
Write(‘nhap n=’);readln(n); S:=0;
For i:=1 to n do s:=s+i;
Writeln(‘ tong cua:’ , n ,‘ so tu nhien la ’, s); Readln;
End.
Vớ dụ 6:
Tớnh tớch của N số tự nhiờn đầu tiờn khỏc khụng
S=1.2.3.4...n
Program bai1;
Var n, i:integer; P:longint; Begin
Write(‘nhap n=’);readln(n); P:=1;
For i:=1 to n do P:=P*i;
Writeln(‘Tich cua:’, P ,‘ so tu nhien la ’, s); Readln;
End.
IV. CỦNG CỐ:
1.Chức nắng của cấu trỳc lặp
2. Cõu lệnh lặp với số lần biết trước for…to…do
3. Tớnh tổng và tớch của n số tự nhiờn đầu tiờn khỏc khụng với cõu lệnh lặp for…to…do
V. DẶN Dề:
- Đọc trước BTH 5 Để tiết sau thực hành. - Xem thuật toỏn tớnh tổng và tớch của 2 số
Tuần 23
Tiết 45 Ngày dạy: 23/01/ 2017 Ngày soạn: 21/01/ 2017
A. MỤC ĐÍCH, YấU CẦU: 1. Kiến thức: 1. Kiến thức:
- Biết nhu cầu cần cú cấu trỳc lặp với số lần chưa biết trước trong ngụn ngữ lập trỡnh.
- Biết ngụn ngữ lập trỡnh dựng cấu trỳc lặp với số lần chưa biết trước để chỉ dẫn mỏy tớnh thực hiện lặp đi lặp lại cụng việc đến khi một điều kiện nào đú được thỏa mản.
- Biết lệnh ghộp trong pascal.
- Hiểu hoạt động của cõu lệnh lặp với số lần biết trước for…to ….do trong pascal. - Viết đỳng được lệnh for…to …do trong một số tỡnh huống đơn giản.
2. Kỹ năng: - Viết đỳng cõu lệnh. Biết sử dụng đỳng và cú hiệu quả cõu lệnh
3. Thỏi độ: Học tập nghiêm túc, tích cực làm các dạng bài tập ứng dụng về cấu trỳc lặp, cú tinh thần học hỏi, sỏng tạo. tinh thần học hỏi, sỏng tạo.
4. Năng lực:
- Mụ hỡnh húa cỏc tỡnh huống thực tiễn quỏ trỡnh xĩy ra với số lần lặp trong cụng việc. - Diễn tả Thuật toỏn hoạt động lặp trong cụng việc.
- Diễn tả cấu trỳc lặp trong ngụn ngữ lập trỡnh.
B. PHƯƠNG PHÁP:
- Hỏi đỏp, tao đổi theo cặp, hoạt động nhúm, thuyết trỡnh tỡm hướng giải quyết vấn đề.
C. CHUẨN BỊ:
- Giỏo viờn: Giỏo ỏn, một mỏy tớnh để giới thiệu - Học sinh: xem và tỡm hiểu trước bài mới
D. TIẾN TRèNH LấN LỚP: I. Ổn định: I. Ổn định:
II. Kiểm tra bài cũ:
?Tỏc dụng của cõu lệnh lặp với số lần biết trước?
III. BÀI MỚI:
Ho t đ ng 1: Tỡm hi u vớ d v cõu l nh l pạ ộ ể ụ ề ệ ặ
Hoạt động của giỏo viờn và học sinh Nội dung
* GV: Giới thiệu cõu lệnh lặp trong PASCAL * HS:Theo dừi
*GV: For, to, do gọi là gỡ? * HS: Từ khúa
* GV: Giới thiệu cỏc thành phần của cõu lệnh? * HS:Ghi bài
* Gv: Gợi ý để HS trả lời
*GV:Cõu lệnh lặp FOR…TO…Do lặp lại việc gỡ?
* HS: Lặp lại cõu lệnh
* GV: Điều kiện dừng lặp lại là gỡ?
* HS: Số lần lặp biết trước là bằng <giỏ trị cuối> - <giỏ trị đầu) +1;
* GV: Chốt lại
5. Vớ dụ về cõu lệnh lặp:
* Vớ dụ về cõu lệnh lặp thường dựng trong PASCAL For…To…Do
* Cõu lệnh lặp cú dạng:
FOR biến đờm := giỏ trị đầu To giỏ trị cuối DO cõu lệnh;
* Trong đú:
- FOR, TO, DO: từ khúa
- Biến đếm là biến kiểu nguyờn
- Giỏ trị đầu < giỏ trị cuối và là giỏ trị nguyờn.
- Số lần lặp = giỏ trị cuối – giỏ trị đầu + 1
* HS: Theo dừi
* GV: Giới thiệu hoạt động của cõu lờnh
* GV: yờu cầu học sinh nờu lại hoạt động của cõu lệnh
* HS: Nờu, lớp nhận xột * HS: Trỡnh bày vào vở
* GV: Chiếu VD3 * HS: Quan sỏt
* GV: Chỉ rừ cõu lệnh for trong vớ dụ
*GV: Cho biết giỏ trị đầu, giỏ trị cuối, biến đếm và cụng việc trong vớ dụ đú
* HS: Nờu i giỏ trị đầu; 10 giỏ trị cuối Writeln(‘ Day la lan lap thu ‘ ,i);
* GV: Cõu lệnh trờn lặp lại việc gỡ? Lặp mấy lần?
* HS: Lặp lại cõu lệnh
Writeln(‘Day la lan lap thu’,i); Lặp lại 10 lần * GV: Chiếu Vd4 * HS: Đọc đề * GV: Để in chữ “O” ra màn hỡnh ta sử dụng lệnh nào? * HS: Lệnh writeln(‘O’); * GV: Em cú thể viết chương trỡnh in ra màn hỡnh 20 chữ ‘O’(như một quả trứng rơi từ trờn xuống dưới)
* HS: Làm theo nhúm
*GV: Thu bài nhúm, chiếu đỏp ỏn
?Em cú nhận xột về thành phần cõu lệnh trong VD4?
* HS: Cõu lệnh sau for ..to..do gồm 2 lệnh đặt giữa begin và end;
* GV: Chốt lại cõu lệnh ghộp * HS: Ghi bài
* Hoạt động
- Cõu lệnh lặp sẽ thực hiện cõu lệnh nhiều lần, mỗi lần là 1 vũng lặp, số vũng lặp là biết trước và bằng < giỏ trị cuối> - <giỏ trị đầu) +1
- Ban đầu biến đếm nhận <giỏ trị đầu>. Sau mỗi vũng lặp biến đếm tự động tăng thờm 1 đơn vị cho đến khi bằng giỏ trị cuối
Vớ dụ 6:
Program lap; Var i: integer; Begin
For i:=1 to 10 do
Writeln(‘Day la lan lap thu’,i); Readln; End. Vớ dụ 7/SGK trang 58: in dũng chữ O trờn màn hỡnh (20 lần). Program chuO; Uses crt; Var i: integer; Begin clrscr; For i:=1 to 20 do begin Writeln(‘O’); Delay (100); End; Readln; End. *Cõu lệnh ghộp gồm 2 lệnh trở lờn đặt giữa cặp từ khúa Begin … end;
Hoạt động 2: Tỡm hiểu cõu lệnh lặp về tớnh tổng và tớch.
* GV: Yờu cầu HS xĩ định INPUT và OUTPUT
* HS:
6. Tớnh tổng và tớch bằng cõu lệnh lặp:Vớ dụ 7: Tớnh tổng của N số tự nhiờn đầu