Giáo án môn Tin Học lớp 11 kì 2 chuẩn theo công văn 5512. Hình thức trình bày đẹp chuẩn theo công văn không cần chỉnh sửa. Theo đúng mẫu của BGD. Các Thầy cô chỉ cần tải về là dùng thôi Tài liệu up lên là file word dễ dàng chỉnh sửa, hình thức đẹp theo mẫu mới nhất. So với đi mua các tài liệu trên nhóm thì tiết kiệm hơn rất nhiều
TUẦN: Ngày soạn: Ngày dạy: CHƯƠNG V : TỆP VÀ THAO TÁC VỚI TỆP BÀI 14 KIỂU DỮ LIỆU TIỆP BÀI 15 THAO TÁC VỚI TỆP I MỤC TIÊU Kiến thức: - Biết khái niệm kiểu liệu tệp - Biết khái niệm tệp định kiểu tệp văn - Biết lệnh khai báo tệp kiểu tệp văn - Biết bước làm việc với tệp: gán tên cho biến tệp, mở tệp, đọc/ghi tệp, đóng tệp - Biết số hàm thủ tục chuẩn làm việc với tệp Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: Câu 1: Đoán nhận kết đoạn chương trình sau: Var a, b: Byte; T: Integer; Begin Readln(a, b); T:=a*b; Write( 'Ket qua la',T); Readln End Hỏi - Khi chạy chương trình nhập a=15, b=20 kết thu là? (300) - Nếu tắt máy khởi động lại kết có cịn lưu lại máy khơng? (Khơng, liệu lưu RAM, không tạo thành File nên bị tắt máy) B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Tìm hiểu kiểu liệu tệp a) Mục tiêu: Nắm kiểu liệu tệp b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: I Kiểu liệu tệp Sau chạy chương trình Vai trò tệp trước ta thấy kết in hình Tệp dãy liệu kiểu, có muốn sử dụng kết sau đặc điểm sau: khơng Do NNLT Pascal - Dữ liệu kiểu tệp lưu trữ lâu đưa kiểu tệp dài nhớ (đĩa từ, CD, ) Kiểu liệu tệp có đặc điểm không bị tắt nguồn điện khác so với kiểu liệu - Lượng thơng tin lưu trữ tệp biết lớn phụ thuộc vào Dựa vào đâu để phân loại tệp,có dung lượng đĩa loại tệp ? Phân loại tệp Đặc điểm tệp văn tệp mà * Xét theo tổ chức liệu có loại: liệu ghi dạng mã ASSCII - Tệp văn bản: tệp mà liệu VD Sách, tài liệu, chương trình ghi dạng kí tự theo mã ASCII nguồn viết ngơn ngữ lập trình bậc (VD: Giáo án, sách, chương trình cao (Quản lý tệp theo dịng) nguồn viết ngơn ngữ lập trình bậc GV: Giải thích tệp có cấu trúc cao ) Tệp truy cập tuần tự? - Tệp có cấu trúc: tệp mà thành Đặc điểm tệp truy cập trực tiếp? phần tổ chức theo cấu * Bước 2: Thực nhiệm vụ: trúc định.(Dữ liệu ảnh, âm + HS: Suy nghĩ, tham khảo sgk trả lời ) câu hỏi * Xét theo cách thức truy cập, có + GV: quan sát trợ giúp cặp loại: * Bước 3: Báo cáo, thảo luận: - Tệp truy cập : (Thường áp + HS: Lắng nghe, ghi chú, HS phát dụng để truy cập tệp văn biểu lại tính chất - Tệp truy cập trực tiếp: (thường áp + Các nhóm nhận xét, bổ sung cho dụng để truy cập têp có cấu trúc) * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức Hoạt động 2: Tìm hiểu Khai báo tệp thao tác với tệp a) Mục tiêu: Nắm Khai báo tệp thao tác với tệp b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS * Bước 1: Chuyển giao nhiệm vụ: Khi làm việc với tệp thao tác thông qua biến tệp Vậy cú pháp khai báo tệp có dạng nào? GV: Giới thiệu cú pháp chung khai báo tệp giải thích đại lượng GV: Cho ví dụ Cho biết thao tác liên quan đến tệp văn bản? - Độ dài lớn tên tệp 79 kí tự GV:Giả sử biến tệp f2 cần gắn với tên tệp Dulieu.Dat - ý nghĩa câu lệnh? - Ý nghĩa hàm eof, eoln ? * Bước 2: Thực nhiệm vụ: + HS: Suy nghĩ, tham khảo sgk trả lời câu hỏi + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức Sản phẩm dự kiến II Thao tác với tệp văn Khai báo Var : text Ví du: Var tep1,tep2: text; Thao tác vớii tệp a Gắn tên tệp vói biến tệp: - Gắn tên tệp với biến tệp qua thủ tục Assign(,); Trong đó: Biến tệp: Là tên tệp chương trình Tên tệp: Là tệp liệu lưu đĩa (Tên tệp biến xâu xâu đường dẫn chứa ổ đĩa) VD: Assign(f2, 'Dulieu.Dat'); Assign (f3, 'C:\Inp.Dat'); b Mở tệp - Mở tệp liệu để ghi Rewrite(); VD: Assign(f2, 'Dulieu.Dat'); Rewrite(f2); - Mở tệp liệu tồn để đọc liệu Reset(); VD: Assign (f3, 'DL.Inp'); Reset (f3); c Đọc ghi tệp văn - Ghi liệu vào tệp Write(,); Hoặc Writeln(,); - Đọc tệp Read(,); Hoặc Readln(,); d Đóng tệp Close(); VD Close(f3); e Một số hàm chuẩn * Hàm EOF, EOLN - Eof() có giá trị true trỏ tệp cuối tệp - Eoln() có giá trị true trỏ tệp cuối dòng C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: - Nhắc lại thao tác tệp văn bản? - Hãy đốn xem đoạn chương trình thực cơng việc gì? D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng: Trong tệp ‘bai2.txt’ ổ C có nội dung: 10 15 tương ứng với biến a,b,c (kiểu nguyên) đọc liệu từ tệp ‘bai2.txt’ tính giá trị biểu thức: T= ghi kết vào tệp ‘bai3.txt’ * HƯỚNG DẪN VỀ NHÀ: - Ôn lại học hôm nay; - Chuẩn bị trước cho tiết sau * RÚT KINH NGHIỆM TUẦN: Ngày soạn: Ngày dạy: Bài 16: V Í DỤ LÀM VIỆC VỚI TỆP I MỤC TIÊU Kiến thức: - Củng cố lại kiến thức học tệp chương thơng qua ví dụ Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: * Câu hỏi: Sắp xếp bảng theo thứ tự bước mở tệp để ghi để đọc? 1.Assign(, ); 2.Rewrite(); Reset(); 3.Read(, ); 4.Write(, ); 5.Close(); * Đáp án: - Mở để ghi: + Assign(, ); Rewrite(); Write(, ); Close(); - Mở để đọc: + Assign(, ); Reset(); Read(, ); Close(); - Bài học trước em làm quen với kiểu liệu kiểu liệu tệp, để em nắm phần kiến thức lí thuyết học, học hơm vào tìm hiểu số ví dụ cụ thể B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Tìm hiểu ví dụ a) Mục tiêu: Nắm nội dung ví dụ b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: Ví dụ (SGK, trang 87) - Chiếu chương trình ví dụ lên bảng gợi Progam Khoang_cach; ý học sinh tìm hiểu chương trình Var d: real; f :text; x, y: integer; - Hàm eof(f) có chức gì? Begin Có thể sử dụng cấu trúc FOR thay cho Assign(f, ‘TRAI.TXT’); WHILE khơng? Reset(f); Chương trình thực cơng việc While not eof(f) gì? Vì sao? Begin Giới thiệu cho HS cách tạo file Read(f,x,y); TRAI.TXT Thực chương trình để D:= sqrt(x*x+y*y); học sinh thấy kết Write(‘Khoang cach: ‘,d:10:2); * Bước 2: Thực nhiệm vụ: End; + HS: Suy nghĩ, tham khảo sgk trả lời Close(f); câu hỏi End + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức Hoạt động 2: Tìm hiểu ví dụ a) Mục tiêu: Nắm nội dung ví dụ b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm Ví dụ (SGK, trang 87) vụ: Program Dien_tro; Chiếu tranh mô kết nối Var a: array[1 5] of real; điện trở, hình 17, trang 88 SGK R1, R2, R3: real; f1,f2 :text; i: integer; Hãy cho biết cơng thức tính điện Begin trở sơ đồ II, III, IV? Assign(f1, ‘RESIST.DAT’); Chiếu chương trình ví dụ lên Reset(f1); bảng Hỏi mảng A dùng để lưu Assign(f2, ‘RESIST.EQU’); trữ giá trị nào? Rewrite(f2); Cho file liệu vào gồm While not eof(f1) hàng Yêu cầu học sinh tính kết Begin Readln(f1,R1,R2,R3); * Bước 2: Thực nhiệm vụ: a[1]:=R1*R2*R3/(R1*R2+R1*R3+R2*R3); + HS: Suy nghĩ, tham khảo sgk a[2]:=R1*R2/(R1+R2)+R3; trả lời câu hỏi a[3]:=R1*R3/(R1+R3)+R2; + GV: quan sát trợ giúp a[4]:=R2*R3/(R2+R3)+R1; cặp a[5]:=R1+R2+R3; * Bước 3: Báo cáo, thảo luận: For i:=1 to write(f2, a[i]:9:3,’ ‘); + HS: Lắng nghe, ghi chú, Writeln(f2); HS phát biểu lại tính chất End; + Các nhóm nhận xét, bổ sung Close(f1); Close(f2); cho End * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: - Làm ví dụ 2/sgk/87 bài1: Đọc dl số thực a.b từ tệp bai1.txt D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng: Biện luận nghiệm pt ax+b=0 Đưa kết luận nghiệm vào tệp bai2.txt * HƯỚNG DẪN VỀ NHÀ: - Ơn lại học hơm nay; - Chuẩn bị trước cho tiết sau * RÚT KINH NGHIỆM TUẦN: Ngày soạn: Ngày dạy: THỰC HÀNH: THAO TÁC VỚI TỆP I MỤC TIÊU Kiến thức - Hs tự xây dựng số thật toán tệp soạn thảo NNLT Pascal - Khắc sâu thêm phần kiến thức lý thuyết tệp, đặc biệt thao tác gắn tên tệp với biến tệp, mở tệp để đọc, mở tệp để ghi Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: Yêu cầu HS: Khởi động chương trình turbo pascaL làm tập tệp máy tính B HÌNH THÀNH KIẾN THỨC MỚI a) Mục tiêu: Làm tập thực hành b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: Bài1: G: hướng dẫn: Program vd1; • Quan sát học sinh thực hành var f:text; x,y:integer; máy d:real; • Kiểm tra làm học sinh Begin • Giải đáp thắc mắc học Assign(f,’trai.txt’); sinh reset(f); Gv: yêu cầu học sinh làm 2: read(f,x,y); • Quan sát học sinh làm tập d:=sqrt(sqr(x)+sqr(y)); • Nhận xét kết write(d); Bài3 close(f); • Đọc dl số thực a.b từ tệp readln; bai1.txt end • Biện luận nghiệm pt ax+b=0 • Đưa kết luận nghiệm vào tệp Cách 2: Program vd1; bai2.txt var f:text; Yêu cầu học sinh làm x,y:integer; máy tính d:real; • Mở tệp bai1.txt để quan sát Begin liệu a,b Assign(f,’trai.txt’); • Mở tệp bai2.txt để quan sát kết reset(f); thực chương trình while not eof(f) * Bước 2: Thực nhiệm vụ: begin + HS: Suy nghĩ, tham khảo sgk trả lời read(f,x,y); câu hỏi d:=sqrt(sqr(x)+sqr(y)); + GV: quan sát trợ giúp cặp write(d); * Bước 3: Báo cáo, thảo luận: end; + HS: Lắng nghe, ghi chú, HS close(f); readln; phát biểu lại tính chất end + Các nhóm nhận xét, bổ sung cho Ví dụ 2: chương trình: * Bước 4: Kết luận, nhận định: GV Var f1,f2:text; xác hóa gọi học sinh nhắc a,b,c:integer; lại kiến thức t:real; begin assign(f1,’bai1.txt’); assign(f2,’bai2.txt’); reset(f1); read(f1,a,b,c); t:=sqrt(a*a*a+b*b+c); rewrite(f2); write(f2,t); close(f1); close(f2); end Bài3: chương trình: Var f1,f2:text; a,b: real; begin assign(f1,’bai1.txt’); assign(f2,’bai2.txt’); reset(f1); rewrite(f2); read(f1,a,b); if (a=0 ) and (b=0) then write(f2,’phuong trinh co vo so nghiem’) else if (a=0) and (b0) then write(f2,’phuong trinh vo nghiem’) else write(f2,’phuong trinh co nghiem:’,-b/a); close(f1); close(f2); readln; end C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: Bài1 • Đọc số thực a,b,c từ tệp baitap1.txt • Biện luận nghiệm pt ax +bx+c=0 (a0) • Đưa kết luận nghiệm vào tệp baitap2.txt D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng * HƯỚNG DẪN VỀ NHÀ: - Ơn lại học hơm nay; - Chuẩn bị trước cho tiết sau * RÚT KINH NGHIỆM TUẦN: Ngày soạn: Ngày dạy: BÀI TẬP I MỤC TIÊU: 1.Kiến thức: - Khắc sâu thêm phần kiến thức lý thuyết kiểu tệp - Nắm số thao tác với tệp: Gắn tên tệp với biến tệp, mở đóng tệp, đọc/ghi tệp Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: Viết cú pháp khai báo tệp, lấy ví dụ B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Tìm hiểu lý thuyết a) Mục tiêu: Nắm nội dung lý thuyết b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm Lý thuyết vụ: */ Vai trò kiểu tệp: a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: Câu 1: Trình bày khái niệm chương trình ? Câu 2: Mục đích sử dụng chương trình ? Câu 3: Hãy nêu khái niệm, phân loại chức loại chương trình B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Tìm hiểu cách viết sử dụng thủ tục a) Mục tiêu: Nắm cách viết sử dụng thủ tục b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hoàn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: Cách viết sử dụng thủ tục Giới thệu cho học sinh cấu trúc thủ tục, a Cấu trúc thủ tục vị trí khai báo thủ tục, lời gọi thủ Procedure []; Vị trí thủ tục nằm phần [] chương trình chính? Begin Cấu trúc thủ tục gồm có phần? [] Phân biệt giống khác End; chương trình chương trình * Trong đó: - Phần đầu gồm tên dành riêng tên Yêu cầu học sinh xác định cấu trúc thủ tục, danh sách tham số (có thể có chung thủ tục khơng); Lời gọi thủ tục ta viết phần - Phần khai báo: dùng để xác định chương trình? hằng, kiểu, biến xác * Bước 2: Thực nhiệm vụ: định chương trình khác + HS: Suy nghĩ, tham khảo sgk trả lời sử dụng thủ tục câu hỏi - Dãy câu lệnh viết cặp tên + GV: quan sát trợ giúp cặp dành riêng Begin End tạo thành thân * Bước 3: Báo cáo, thảo luận: thủ tục + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức Hoạt động 2: Tìm hiểu a) Mục tiêu: Nắm b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hoàn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: b Ví dụ thủ tục Chiếu ví dụ 2, yêu cầu học sinh nhận * Ví dụ 1; xét thủ tục ve_HCN ví dụ Program VD_thutuc2; với ví dụ trước Uses crt; * Tổ chức hoạt động nhóm; Var a, b, i: integer; - Phân nhóm từ 4-6 em Procedure Ve_HCN(chdai, chrong: - Công việc: Xác định chất thủ integer); tục ve_HCN; Var i,j: integer; - Câu hỏi: câu lệnh thực vẽ Begin cạnh trên, hai cạnh bên câu lệnh {Ve canh tren cua hinh chu nhat} thực vẽ cạnh For i:=1 to chdai write(‘*’); Trong chương trình ta vẽ tất Writeln; thủ tục For j:=1 to chrong-2 write(‘ ’); Chiếu VD_thambien1 len bảng Begin thủ tục thực cơng việc Write(‘*’); Chạy chương trình thực đổi For i:=1 to chdai-2 write(‘ phần khai báo thành: Procedure ’); Hoan_doi (x: integer; var y: integer); Writeln(‘*’); để HS quan sát nhận xét khác End; tham biến tham trị For i:=1 to chdai write(‘*’); * Bước 2: Thực nhiệm vụ: Writeln; + HS: Suy nghĩ, tham khảo sgk trả lời End; câu hỏi BEGIN {Bat dau chuong trinh chinh} + GV: quan sát trợ giúp cặp Clrscr; * Bước 3: Báo cáo, thảo luận: Ve_HCN(25,10); + HS: Lắng nghe, ghi chú, HS Writeln; Writeln; phát biểu lại tính chất Ve_HCN(5,10); + Các nhóm nhận xét, bổ sung cho Readln; Clrscr; * Bước 4: Kết luận, nhận định: GV a:=4; b:=2; xác hóa gọi học sinh nhắc For i:=1 to lại kiến thức Begin Ve_HCN(a,b); Readln; clrscr; a:=a*2; b:=b*2; end; Readln; END * Tham số giá trị: có hai chức - Đưa liệu vào cho chương trình con; - Đưa liệu chương trình tìm * Tham số biến: lệnh gọi thủ tục, tham số hình thức thay tham số thực tương ứng tên biến chứa liệu gọi tham số biến c Program VD_thambien1; Uses crt; Var a, b: integer; Procedure Hoan_doi (var x, y: integer); Var TG: integer; Begin TG:=x; x:=y; y:=TG; End; BEGIN Clrscr; A:= 5; b:=10; Writeln(a:6, b:6); Hoan_doi(a,b); Writeln(a:6,b:6); END C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: - Khi cần khai báo tham số phần khai báo chương trình theo kiểu tham biến, theo kiểu tham trị - Phân biệt giống khác tham biến tham trị D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng: Viết thủ tục tìm thơng báo số lớn ba số a, b, c * HƯỚNG DẪN VỀ NHÀ: - Ơn lại học hơm nay; - Chuẩn bị trước cho tiết sau * RÚT KINH NGHIỆM TUẦN: Ngày soạn: Ngày dạy: Bài 18: VÍ DỤ VỀ CÁCH VIẾT VÀ SỬ DỤNG CHƯƠNG TRÌNH CON (TIẾP) I MỤC TIÊU Kiến thức : - Giúp học sinh nắm được: - Cấu trúc chung thủ tục chương trình - Phân biệt tham số tham trị - Các khái niệm biến toàn cục biến cục Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Tìm hiểu cách viết sử dụng hàm a) Mục tiêu: Nắm cách viết sử dụng hàm b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hoàn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: Cách viết sử dụng hàm Cho biết tên cách sử dụng số a Cấu trúc thủ tục hàm học? Function []: ; - Lời gọi hàm viết biểu [] thức tốn hạng, chí Begin tham số hàm khác [] Điểm khác biệt thủ tục hàm := ; gì? End; so sánh giống khác hàm thủ tục? * Bước 2: Thực nhiệm vụ: + HS: Suy nghĩ, tham khảo sgk trả lời câu hỏi + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức Hoạt động 2: Tìm hiểu ví dụ a) Mục tiêu: Nắm nội dung ví dụ b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: b Ví dụ hàm VD1: Chiếu ví dụ rút gọn phân số * Ví dụ 1; - Trong chương trình có sử dụng bao Program Rutgon_Phanso; nhiêu hàm Uses crt; - hàm UCLN(x,y) dùng để làm gì? Var a, tuso, mauso: integer; - Lời gọi hàm nằm đâu? Có khác Function UCLN(x,y: integer):integer; với thủ tục lời gọi hàm? Var sodu: integer; - Có biến sử dụng Begin chương trình? Các biến While y0 khai báo chổ chương trình Begin chính? Sodu:= x mod y; - Yêu cầu học sinh phân biệt giống X:= y; khác biến toàn cục biến Y:= sodu; cục End; - chạy chương trình để học sinh kiểm UCLN:=x; nghiệm tự rút kết luận End; VD2: Chiếu ví dụ Minbaso lên bảng BEGIN {Bat dau chuong trinh chinh} minh hoạ cho học sinh cách gọi hàm Clrscr; * Bước 2: Thực nhiệm vụ: Write(‘Nhap tu so va mau so: ‘); + HS: Suy nghĩ, tham khảo sgk trả lời readln(tuso,mauso); câu hỏi A:=UCLN(tuso, mauso); + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức If a>1 then Begin Tuso:= tuso div a; Mauso:= mauso div a; end; Writeln(tuso:5, ‘/’ ,mauso:5); Readln; END * Ví dụ 2: Program Minbaso; Uses crt; Var a, b, c: real; Function Min(a,b: real):real; Begin If ay then GTLN :=x Hướng dẫn else - Viết CT tìm GTLN số GTLN:=y; - Trong CT có lời gọi đến Begin CTC tìm GTLN writeln ('nhap so a,b,c,d;'); Bài 2: Viết chương trình tim Readln(a,b,c,d); BSCNN số a, b Writeln('GTLN Gợi ý: la:',GTLN(GTLN(GTLN(a,b),c),D):10:2); Trong chương chình có sử dụng readln đến chương trình tìm UCLN End số (a, b) Bài 2: HS dựa vào gợi ý tự viết chương * Bước 2: Thực nhiệm vụ: trình + HS: Suy nghĩ, tham khảo sgk trả lời câu hỏi + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: Xem lại nội dung kiến thức mảng, xâu, tệp, CTC D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng * HƯỚNG DẪN VỀ NHÀ: - Ơn lại học hơm nay; - Chuẩn bị trước cho tiết sau * RÚT KINH NGHIỆM TUẦN: Ngày soạn: Ngày dạy: ÔN TẬP CUỐI NĂM I MỤC TIÊU: 1.Kiến thức: - Nắm toàn kiến thức học từ đầu năm học Năng lực - Năng lực giải vấn đề, sáng tạo - Năng lực tự học, đọc hiểu - Năng lực hợp tác nhóm: trao đổi thảo luận, trình bày kết - Năng lực tính tốn, Năng lực thực hành Phẩm chất - Phẩm chất: Giúp học sinh rèn luyện thân phát triển phẩm chất tốt đẹp: yêu nước, nhân ái, chăm chỉ, trung thực, trách nhiệm II THIẾT BỊ DẠY HỌC VÀ HỌC LIỆU Giáo viên: Sách giáo khoa, máy tính điện tử Học sinh: đồ dùng học tập, SGK, ghi, máy tính III TIẾN TRÌNH DẠY HỌC A HOẠT ĐỘNG KHỞI ĐỘNG (MỞ ĐẦU) a) Mục tiêu: Tạo tình khơi gợi tinh thần cho học sinh b) Nội dung: Hs dựa vào hiểu biết để trả lời câu hỏi c) Sản phẩm: Từ yêu cầu HS vận dụng kiến thức để trả lời câu hỏi GV đưa d) Tổ chức thực hiện: GV giới thiệu dẫn dắt vào bài: B HÌNH THÀNH KIẾN THỨC MỚI Hoạt động 1: Nhắc lại kiến thức học a) Mục tiêu: Nhắc lại kiến thức học b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hoàn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: theo dõi câu hỏi giáo viên - Kể tên loại ngơn ngữ lập suy nghĩ trả lời trình - Ngôn ngữ máy - Phân biệt hai kĩ thuật biên dịch - Hợp ngữ thông dịch - Ngôn ngữ bậc cao : Pasacl, c, - trình bày thành phần - Biên dịch: ngôn ngữ lập trình - Thơng dịch: - Nêu cấu trúc chung - Bảng chữ cái, cú pháp ngữ nghĩa chương trình Pascal Cho ví dụ - Gồm phần: Phần khia báo phần đơn giản thân - Kể tên kiểu liệu đơn giản Program vd; học, giới hạn kiểu đó, Var i:integer; phép toán tương ứng kiểu Begin; hàm liên quan i:=5; - Viết cấu trúc chung lệnh gán Writeln(i); chức lệnh Readln; - Viết cấu trúc chung thủ tục End nhập/xuất liệu - Số nguyên, số thực, kí tự, logic - Nêu cấu trúc chung lệnh rẽ - Phép toán số học, phép toán quan hệ, nhánh phép toán logic - Nêu cấu trúc chung lệnh lặp - Biểu thức số học, biểu thức quan hệ - Cách khai báo kiểu mảng, khai biểu thức logic báo biến kiểu mảng tham chiếu - Hàm bình phương, hàm bậc hai, đến phần tử mảng hàm giá trị tuyệt đối, hàm sin, hàm cos - Cách khai báo biến xâu, tham - Tên biến:=biểu thức; chiếu đến kí tự xâu, - Dùng để tính tốn biểu thức hàm thủ tục liên quan đến xâu gán giá trị cho biến * Bước 2: Thực nhiệm vụ: - Thủ tục Read()/readln(); + HS: Suy nghĩ, tham khảo sgk trả - Thủ tục Write()/writeln(); lời câu hỏi If then + GV: quan sát trợ giúp cặp else; * Bước 3: Báo cáo, thảo luận: For i:=gt1 to gt2 do; + HS: Lắng nghe, ghi chú, HS While phát biểu lại tính chất - Type tênkiểu = Array[cs1 cs2] of + Các nhóm nhận xét, bổ sung cho kiểu_phần_tử; - Var tênbiến: tênkiểu; * Bước 4: Kết luận, nhận định: GV - Tênbiến[chỉ số] xác hóa gọi học sinh nhắc - Var tênbiến:string; lại kiến thức - Tênbiếnxâu[chỉ số] - Hàm: length(st), upcase(ch), copy(st,p,n) - Thủ tục: Delete(st,p,n), str(n,st), Var(st,n,m1), Insert(s1,s2,n); Hoạt động 2: Rèn luyện kĩ viết chương trình a) Mục tiêu: vận dụng kiến thức để giải tập b) Nội dung: HS quan sát SGK để tìm hiểu nội dung kiến thức theo yêu cầu GV c) Sản phẩm: HS hồn thành tìm hiểu kiến thức d) Tổ chức thực hiện: Hoạt động GV HS Sản phẩm dự kiến * Bước 1: Chuyển giao nhiệm vụ: Các nhóm trình bày kết Nhập dãy số, tìm ước số chung lớn chương trình N số in kết hình Chia lớp làm nhóm Nhóm 1: Viết chương trình on, nhập giá trị cho bảng Nhóm 2: Viết chương trình con, tìm ước số chung lớn số NHÓM 3: Viết chương trình có chương trình nhập mang tìm ước số chung lớn hai số Yêu cầu HS ghép ccs chương trình để chương trình * Bước 2: Thực nhiệm vụ: + HS: Suy nghĩ, tham khảo sgk trả lời câu hỏi + GV: quan sát trợ giúp cặp * Bước 3: Báo cáo, thảo luận: + HS: Lắng nghe, ghi chú, HS phát biểu lại tính chất + Các nhóm nhận xét, bổ sung cho * Bước 4: Kết luận, nhận định: GV xác hóa gọi học sinh nhắc lại kiến thức C HOẠT ĐỘNG LUYỆN TẬP a Mục tiêu: Củng cố, luyện tập kiến thức vừa học b Nội dung: HS đọc SGK làm tập c Sản phẩm: Bài làm học sinh, kĩ giải nhiệm vụ học tập d Tổ chức thực hiện: - Khái niệm ngơn ngữ lập trình ngơn ngữ lập trình Pascal - Chương trình Turbo Pascal đơn giản - Tổ chức rẽ nhánh lặp - Kiểu liệu có cấu trúc - kiểu tệp thao tác xử lí tệp - Chương trình - lập trình xử lí đồ họa âm D HOẠT ĐỘNG VẬN DỤNG a Mục tiêu: Vận dụng kiến thức vừa học vấn đề học tập thực tiễn b Nội dung: HS sử dụng SGK vận dụng kiến thức để trả lời câu hỏi c Sản phẩm: HS vận dụng kiến thức vào giải nhiệm vụ đặt d Tổ chức thực hiện: GV chia lớp thành nhiều nhóm giao nhiệm vụ: thảo luận trả lời câu hỏi tập vận dụng * HƯỚNG DẪN VỀ NHÀ: Chuẩn bị kiến thức cho tiết sau kiểm tra cuối năm: Xem lại tồn kiến thức ơn tập * RÚT KINH NGHIỆM ... a[1]:=R1*R2*R3/(R1*R2+R1*R3+R2*R3); + HS: Suy nghĩ, tham khảo sgk a [2] :=R1*R2/(R1+R2)+R3; trả lời câu hỏi a[3]:=R1*R3/(R1+R3)+R2; + GV: quan sát trợ giúp a[4]:=R2*R3/(R2+R3)+R1; cặp a[5]:=R1+R2+R3; * Bước... t:=sqrt(a*a*a+b*b+c); rewrite(f2); write(f2,t); close(f1); close(f2); end Bài3: chương trình: Var f1,f2:text; a,b: real; begin assign(f1,’bai1.txt’); assign(f2,’bai2.txt’); reset(f1); rewrite(f2); read(f1,a,b);... Assign(f2, ‘RESIST.EQU’); trữ giá trị nào? Rewrite(f2); Cho file liệu vào gồm While not eof(f1) hàng Yêu cầu học sinh tính kết Begin Readln(f1,R1,R2,R3); * Bước 2: Thực nhiệm vụ: a[1]:=R1*R2*R3/(R1*R2+R1*R3+R2*R3);