Bài mới: T/g Hoạt động của thầy Hoạt động của trò 15p + Hoạt động 1: Ví dụ về cầu lệnh lặp GV: dùng bảng phụ dán ct ví dụ 2 lên bảng yêu cầu hs quan sát đọc hiểu ý - HS: quan sát đọc hiể[r]
(1)Ngày soạn: 24/12/2011 Tiết 37: CÂU LỆNH LẶP I Mục tiêu: Kiến thức: - Trình bày nhu cầu cần có cấu trúc lặp ngôn ngữ lập trình - Trình bày ngôn ngữ lập trình dùng cấu trúc lặp để dẫn máy tính thực lặp lặp lại công việc nào đó số lần - Giải thích hoạt động câu lệnh lặp với số lần biết trước For Pascal Kĩ năng: - Rèn luyện kỹ vận dụng câu lệnh lặp Thái độ: - Thái độ học tập nghiêm túc, yêu thích môn học II Chuẩn bị: Sách giáo khoa, máy tính điện tử III Tiến trình bài dạy: Tổ chức ổn định lớp (1’) Bài T/g Hoạt động thầy Hoạt động trò Nội dung 10p + Hoạt động 1: Tìm Các công việc phải hiểu các công việc phải thực thực nhiều lần sống Trong sống ngày, nhiều hoạt động thực lặp lặp lại nhiều lần ví dụ: + Học sinh chú ý lắng nghe => - Các ngày tuần ghi nhớ kiến thức các em lặp lặp lại hoạt động buổi sáng đến trường và buổi trưa trở nh - Các em học bài thì phải đọc đọc lại nhiều lần thuộc bài.? Em hãy cho vài vì dụ sống mà ta phải thực lặp lặp lại nhiều lần với số lần có thể biết trước và không biết trước + Hoạt động 2: Tìm + Số lần lặp biết trước: Các ngày tuần các em lặp lặp lại hoạt động buổi sáng đến trường và buổi trưa trở nhà + Số lần lặp không biết trước: Trong trận cầu lông các em lặp lặp lại công việc đánh cầu kết thúc trận cầu Khi viết chương trình máy tính, nhiều trường hợp ta phải viết lặp lại nhiều câu lệnh để thực phép tính định (2) T/g 15p Hoạt động thầy hiểu câu lệnh lặp - lệnh thay cho nhiều lệnh Ví dụ 1: Giả sử cần vẽ hình vuông có cạnh đơn vị Mỗi hình vuông là ảnh dịch chuyển hình bên trái nó khoảng cách đơn vị ? Việc vẽ hình có thể thực theo thuật toán nào Hoạt động trò Nội dung Câu lệnh lặp - lệnh thay cho nhiều lệnh: + Học sinh chú ý lắng nghe Việc vẽ hình có thể thực theo thuật toán sau: - Bước 1: vẽ hình vuông(vẽ liên tiếp cạnh và trở đỉnh ban đầu) - Bước 2: Nếu số hình vuông đã vẽ ít , di chuyển bút vẽ bên phải đơn vị và trở lại bước 1; Ví dụ 2: Thuật toán tính ngược lại thì kết thúc thuật Cách mô tả các hoạt S= 1+2+3+ … + 100 toán động thuật toán Bước 1: S ← 0; i ← các ví dụ gọi Bước 2: i← i + là cấu trúc lặp Bước 3: i ≤ 100, thì Học sinh chú ý lắng nghe, ghi S ← S + i và quay lại nhớ kiến thức bước 2; ngược lại kết thúc - Mọi ngôn ngữ lập trình có cách để thị Học sinh chú ý lắng nghe cho máy tính thực cấu trúc lặp với câu lệnh đó là “câu lệnh lặp” - Mọi ngôn ngữ lập trình có cách để thị cho máy tính thực cấu trúc lặp với câu lệnh đó là “câu lệnh lặp” 15p Hoạt động 3: tìm hiểu cú pháp câu lệnh lặp GV: Câu lệnh lặp thường gặp Pascal - HS: for<biến đếm>:= <giá có dạng ntn? trị đầu> to <giá trị cuối> <câu lệnh>; Gv: khẳng định lại ghi bảng GV: Trong đó For, to, là từ gì? - HS: từ khóa GV: Biến đếm có kiểu liệu gì? - HS: Biến đếm là biến đơn có kiểu nguyên; 3/ Ví dụ câu lệnh lặp Cú Pháp câu lệnh lặp với số lần biết trước Pascal for<biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>; đó: for, to, là các từ khóa -Biến đếm là biến có kiểu nguyên; -Giá trị đầu và giá trị (3) T/g Hoạt động thầy Hoạt động trò GV: Giá trị đầu và giá trị cuối có kiểu ntn? - HS: có cùng kiểu với biến đếm (kiểu nguyên) GV: giá trị cuối ntn với giá trị đầu? - HS: giá trị cuối lớn giá trị đầu GV: câu lệnh lặp này thực ntn? -HS: Câu lệnh lặp thực câu lệnh nhiều lần, lần, là vòng lặp Số lần lặp là biết trước và bằng: giá trị cuối – giá trị đầu + GV: thực ban đầu biến đếm nhận -HS: nhận giá trị giá trị giá trị là bào nhiêu? đầu GV: Sau vòng lặp -HS: sau vòng lặp, biến biến đếm ntn? đếm tự động tăng thêm đơn vị giá trị cuối GV viết bảng HS: Lắng nghe ghi chép Nội dung cuối là các giá trị nguyên, giá trị cuối phải lớn giá trị đầu; - Câu lệnh lặp thực câu lệnh nhiều lần, lần, là vòng lặp Số lần lặp là biết trước và bằng: giá trị cuối – giá trị đầu + - Khi thực hiện, ban đầu biến nhận giá trị là giá trị đầu, sau vòng lặp, biến đếm tự động tăng thêm đơn vị giá trị cuối -Câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép IV Củng cố: (5phút) ? Cho vài ví dụ hoạt động thực lặp lại sống ngày V Dặn dò: (2phút) - Về nhà học bài kết hợp sách giáo khoa RÚT KINH NGHIỆM SAU TIẾT DẠY Ngày soạn:24/12/2011 Tiết 38: I Mục tiêu: Kiến thức: CÂU LỆNH LẶP (tt) (4) - Giải thích hoạt động câu lệnh lặp với số lần biết trước For Pascal - Viết đúng lệnh For tình đơn giản - Giải thích lệnh ghép Pascal Kĩ năng: - Rèn luyện kỹ sử dụng vòng lặp để làm bài tập Thái độ: - Thái độ học tập nghiêm túc, yêu thích môn học II Chuẩn bị: Sách giáo khoa, máy tính điện tử III Tiến trình bài dạy: Ổn định lớp (1’) Kiểm tra bài cũ: (5’) ? Cho vài ví dụ hoạt động thực lặp lại sống ngày ? Viết Cp câu lệnh lặp, giải thích các thành phần có đó, câu lệnh thực ntn? Bài mới: T/g Hoạt động thầy Hoạt động trò 15p + Hoạt động 1: Ví dụ cầu lệnh lặp GV: dùng bảng phụ dán ct ví dụ lên bảng yêu cầu hs quan sát đọc hiểu ý - HS: quan sát đọc hiểu nghĩa ct GV: gọi hs giải thích - HS giải thích GV: Giải thích thêm chương trình ví dụ HS: Lắng nghe ghi chép cho hs GV: dùng bảng phụ dán ct ví dụ lên bảng yêu cầu hs quan sát đọc hiểu ý - HS: quan sát đọc hiểu nghĩa ct GV: gọi hs giải thích - HS giải thích GV: Giải thích thêm HS: Lắng nghe ghi chép chương trình ví dụ cho hs Cho hs nhận xét và so sánh khác câu lệnh lặp hai vd trên? Nội dung Ví dụ câu lệnh lặp: Vd 1: Chương trình in màn hình thứ tự lần lặp var i:integer; begin for i:= to 20 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 clrscr; for i:= to 20 begin writeln(‘O’); delay(200); end; readln; end (5) T/g 20p Hoạt động thầy Gv: Giải thích cho học sinh vd2 câu lệnh lặp có begin … end Hoạt động trò + Hoạt động 2: Tìm hiểu tính tổng và tích câu lệnh lặp Ví dụ 5: Chương trình sau đây tính tổng N số tự nhiên đầu tiên với N nhập từ bàn phím GV: dùng bảng phụ dán ct ví dụ lên bảng yêu cầu hs quan sát đọc hiểu ý - HS: quan sát đọc hiểu nghĩa ct GV: gọi hs giải thích - HS giải thích GV: Giải thích thêm chương trình ví dụ HS: Lắng nghe ghi chép cho hs - 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 hướng dẫn giáo viên - HS viết chương trình: Nội dung *Lưu ý: Câu lệnh có sử dụng câu lệnh ghép thì phải đặt hai từ khóa begin … end Tính tổng và tích câu lệnh lặp: Ví dụ 5: Chương trình sau đây 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 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 Write(‘N =’); readln(N); P:=1; For i:=1 to N P:=P*i; Wirteln(N,’!=’,P); Readln; program End Tinh_Giai_Thua; - GV: gọi hs lên bảng - HS theo dõi nhận xét sửa var N,i:integer; trình bày sai có P:longint; - GV theo dõi begin - GV giải thích thêm ct write(‘Nhap so N = ‘); cho hs - HS lắng nghe theo dõi readln(N); ghi bài P:= 1; for i:= to N P:= P*i; (6) T/g Hoạt động thầy Hoạt động trò Nội dung writeln( N, ‘! = ‘, P); readln; end IV Củng cố: (3phút) - Gọi hs giải thích lại chương trình tính tổng N số tự nhiên đầu tiên V Dặn dò: (1phút) - Về nhà học bài kết hợp sách giáo khoa RÚT KINH NGHIỆM SAU TIẾT DẠY Tiết 41: Ngày soạn: 08/01/2012 Bài thực hành số LÀM QUEN VỚI TURBO PASCAL I Mục tiêu: Kiến thức: - Biết viết chương trình Pascal có câu lệnh lặp For Kĩ năng: - Rèn luyện kĩ đọc hiểu chương trình Thái độ: - Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực số công việc II Chuẩn bị: (7) Nội dung bài thực hành, máy tính điện tử III Tiến trình thực hành: T/g Hoạt động thầy 10p + Hoạt động 1: Ôn lại câu lệnh lặp For ? Hãy nêu cú pháp và chức câu lệnh lặp For 28p + Hoạt động 2: Viết chương trình in màn hình bảng nhân số từ đến 9, số nhập từ bàn phím và dừng màn hình để có thể quan sát kết - Gõ chương trình sau đây: uses crt; var N,i:integer; begin clrscr; write('Nhap so N='); readln(N); writeln; writeln('Bang nhan ',N); writeln; for i:=1 to 10 writeln(N,' x ',i:2,' = ',N*i:3); readln end - Tìm hiểu ý nghĩa các câu lệnh chương trình, dịch chương trình và sửa lỗi Hoạt động trò Nội dung - Cú pháp: For <biến đếm>:= <giá trị đầu> to Ôn lại câu lệnh lặp <giá trị cuối> <câu For do: lệnh>; + Cú pháp: + Hoạt động vòng lặp: + Hoạt động - 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, biểu thức điều kiện đúng thì thực câu lệnh - B3: Biến đếm tự động tăng lên đơ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 khỏi vòng lặp Viết chương trình in màn hình bảng nhân số từ đến 9, số + Học sinh đọc kĩ đề và nhập từ bàn phím phân tích yêu cầu bài và dừng màn hình để có toán thể quan sát kết + Gõ chương trình vào máy theo yêu cầu giáo viên + Tìm hiểu ý nghĩa các câu lệnh theo hướng dẫn giáo viên - Chạy chương trình với + Nhấn phím F9 để sửa (8) các giá trị nhập vào lần lược là 1, 2,…10 Quan sát kết nhận trên màn hình lỗi (nếu có) + Nhấn Ctrl + F9 để chạy chương trình và nhập các giá trị vào, quan sát kết trên màn hình theo hướng dẫn giáo viên IV Nhận xét (5 phút) Giáo viên nhận xét và đánh giá tiết thực hành V Dặn dò: (2 phút) - Tiết sau thực hành: “ Bài thực hành số (tt) Tiết 42: Bài thực hành số (tt) LÀM QUEN VỚI TURBO PASCAL I Mục tiêu: Kiến thức: - Biết viết chương trình Pascal có câu lệnh lặp For Kĩ năng: - Rèn luyện kĩ đọc hiểu chương trình Thái độ: - Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực số công việc II Chuẩn bị: Nội dung bài thực hành, máy tính điện tử III Tiến trình thực hành: T/g Hoạt động thầy Hoạt động trò Nội dung 15p + Hoạt động 1: Bài tập - Chỉnh sửa chương trình để Chỉnh sửa chương làm đẹp kết trên màn trình để làm đẹp kết hình trên màn hình ? Kết chủ chương trình + Có hai nhược điểm sau nhận bài có đây: (9) nhược điểm nào - Các hàng kết quá sát nên khó đọc - Các hàng kết không cân hàng tiêu đề ? Nên sửa lại cách + Nên sửa lại cách nào chèn thêm hàng trống các hàng kết và đẩy các hàng này sang phải khoảng - Chỉnh sửa câu lệnh lặp cách nào đó chương trình sau: for i:=1 to 10 begin + Học sinh chỉnh sửa GotoXY(5,WhereY); theo hướng dẫn writeln(N,' x ',i:2,' = ',N*i:3); giáo viên writeln ; end; - Dịch và chạy chương trình với các giá trị gõ vào từ bàn phím Quan sát kết nhận trên màn hình + Học sinh thực 23p + Hoạt động 2: Tìm hiểu theo yêu cầu giáo chương trình sau: viên Program tao_bang; Uses crt; Var i,j: byte; Begin + Tìm hiểu chương trinh Clrscr; theo hướng dẫn For i:= to giáo viên Begin For j:= to Write(10*i + j:4); Writeln; End; Readln; End - Gõ và chạy chương trình, quan sát kết trên màn hình + Học sinh độc lập gõ chương trình + Nhấn F9 để dịch và sửa lỗi chương trình + Nhấn Ctrl + F9 để chạy chương trình và kiểm tra kết Tìm hiểu chương trình sau: Program tao_bang; Uses crt; Var i,j: byte; Begin Clrscr; For i:= to Begin For j:= to Write(10*i + j:4); Writeln; End; Readln; End (10) IV Nhận xét (5 phút) Giáo viên nhận xét và đánh giá tiết thực hành V Dặn dò: (2 phút) - Tiết sau thực hành: “ Bài thực hành số (tt) (11)