GV:NGUYỄN CÔNG QUANG Tuần:16 Tiết 48 Ngày dạy:8/5/2009 BÀI 18: THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN I. Mục Tiêu Bài Dạy: 1)Kiến thức. Biết số thư viện chương trình chuẩn Pascal. Giới thiệu khả đồ họa, âm thanh, quản lý thiết bị vào/ra môi trường Pascal. Sử dụng thư viện chương trình Crt Graph. 2)Kỹ :Nhận Học sinh nắm cách khai báo sử dụng thư viện chương trình Crt Graph.Nắm chế độ làm việc hình môi trường Pascal.Hiểu thủ tục vẽ hình thư viện Graph. 3)Thái độ Rèn luyện phẩm chất người lập trình tinh thần hợp tác, sẵn sàng làm việc theo nhóm, tuân thủ theo yêu cầu công việc chung. II. Chuẩn Bị: 1.Giáo viên: Giáo án, máy chiếu, phấn bảng,sách giáo khoa tin học 11. 2.Học sinh: Chuẩn bị tập nhà,vở ghi. III. Phương Pháp Dạy Học:Vấn đáp tìm tòi, trực quan, tạo tình giúp học sinh dễ hình dung tham gia tích cực vào học. IV. Tiến Trình Dạy Học: 1. Ổn định tổ chức: Kiểm tra số lượng,hiện diện học sinh lớp. 2. Kiểm tra cũ: Câu 1:Nêu khái niệm lợi ích chương trình phân loại? Câu 2:Nêu cấu trúc chương trình cho ví dụ? Giáo viên nhận xét câu trả lời học sinh cho điểm. 3. Giảng mới: HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG GV: Chiếu cho học sinh xem chương 1. CRT: trình có ứng dụng đồ họa âm thanh. Thư viện crt chứa thủ tục liên quan đến quản lý khai thác GV: Bằng cách viết chương hình bàn phím máy tính. trình vậy? − Một số thủ tục thư viện crt: Begin Thủ tục clrscr() : xóa hình. Clrscr; Thủ tục TextColor(color): đặt màu cho chữ Readln; hình, color biến xác định màu. End. GV: Tại chương trình bị lỗi, khắc Thủ tục TextBackground(color): đặt màu cho phục nào? Thủ tục dùng hình, color biến xác định màu. để làm gì? Thủ tục GotoXY(x,y) : đưa trỏ đến vị trí cột x, Muốn sử dụng thủ tục cần phải sử dòng y hình. dụng thư viện Crt cách: Chú ý: hình hình văn gồm 25 dòng, 80 cột nên 1≤ x ≤ 80, Uses CRT; ≤ y ≤ 25. Vậy thư viện Crt gì? 2.GRAPH : Thư viện GRAPH chứa hàm thủ tục liên quan đến chế độ đồ họa cho phép thực thao tác vẽ điểm, đường, tô màu… GV: Cho ví dụ giải thích: Ví dụ: Chương trình xuất chữ Hello a. Các thiết bị chương trình hỗ trợ đồ họa:Màn hình World dòng 20,cột 20, chữ màu đỏ: làm việc hai chế độ: chế độ văn chế độ đồ họa. Program Xuat_Chu; Bản mạnh điều Uses crt; khiển hình thiết bị đảm bảo tương tác xử lí Var s:string[20]; hình để thực chế độ phân giải màu sắc. Các chương trình Begin điều khiển nằm tập tin có phần mở rộng BGI Clrscr; (Borland Graphic Interface). s:=’Hello World’; Tọa độ gotoxy(20,20); GV:NGUYỄN CÔNG QUANG textcolor(red); write(s); readln; End. hình đồ họa đánh số từ 0, cột tính từ trái sáng phải dòng tính từ xuống dưới. b.Khởi tạo chế độ đồ họa:Thủ tục thiết lập chế độ đồ họa: Procedure InitGraph(var driver,mode: integer; path: string) Trong đó: GV:Hướng dẫn hs khởi tạo chế độ đồ Driver số hiệu trình điều khiển BGI. Thông thường hoạ giải thích driver gán 0. Mode số hiệu độ phân giải HS:chú ý lắng nghe Path đường dẫn đến thư mục BGI Ví dụ:Giả sử tập tin có phần mở rộng BGI thư mục C:\TP\BGI. Các lệnh để thiết lập chế độ đồ họa là: Driver := 0; Initgraph(driver,mode,’C:\TP\BGI’); =>Để chuyển chế độ văn ta dùng thủ tục: CloseGraph; 4.Củng cố luyện tập: . Nhắc lại trọng tâm học: a) Nắm nội dung thư viện dùng làm gì. Hiểu hai thư viện CRT GRAPH. b) Cách sử dụng chương trình. 5.Hướng dẫn học sinh tự học nhà:Về nhà Ôn tập cuối năm. V. Rút Kinh Nghiệm: ………………………………………………………………………………………………………………… ………………………………………………………………………………………………………………… ………………………………………………………………………………………………………………… Tuần:16 Tiết 49 Ngày dạy:8/5/2009 BÀI 18: THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN(tt) VI. Mục Tiêu Bài Dạy: 1)Kiến thức. Biết số thư viện chương trình chuẩn Pascal. Giới thiệu khả đồ họa, âm thanh, quản lý thiết bị vào/ra môi trường Pascal. Sử dụng thư viện chương trình Crt Graph. 2)Kỹ :Nhận Học sinh nắm cách khai báo sử dụng thư viện chương trình Crt Graph.Nắm chế độ làm việc hình môi trường Pascal.Hiểu thủ tục vẽ hình thư viện Graph. 3)Thái độ Rèn luyện phẩm chất người lập trình tinh thần hợp tác, sẵn sàng làm việc theo nhóm, tuân thủ theo yêu cầu công việc chung. VII. Chuẩn Bị: 1.Giáo viên: Giáo án, máy chiếu, phấn bảng,sách giáo khoa tin học 11. 2.Học sinh: Chuẩn bị tập nhà,vở ghi. VIII. Phương Pháp Dạy Học:Vấn đáp tìm tòi, trực quan, tạo tình giúp học sinh dễ hình dung tham gia tích cực vào học. IX. Tiến Trình Dạy Học: 3. Ổn định tổ chức: Kiểm tra số lượng,hiện diện học sinh lớp. 4. Kiểm tra cũ: Câu 1:Nêu khái niệm lợi ích chương trình phân loại? Câu 2:Nêu cấu trúc chương trình cho ví dụ? Giáo viên nhận xét câu trả lời học sinh cho điểm. 3. Giảng mới: HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG GV: Giảng c.Các thủ tục vẽ điểm, đoạn thẳng: HS: Ghi Thủ tục đặt màu cho nét vẽ: GV:NGUYỄN CÔNG QUANG Ví dụ: vẽ đoạn thẳng. Program Ve_Doan_Thang; Uses crt,graph; Var gd,gm:integer; Begin gd:=0; {Khởi tạo chế độ đồ họa} initgraph(gd,gm,’C:\BP\BGI’); setcolor(red); {Vẽ từ điểm (10,10) đến điễm (100,100)} line(10,10,100,100); {Chờ người dùng ấn phím} repeat until Keypressed; Closegraph; End. Hỏi: procedure PutPixel (50, 50, yellow); kết thủ tục trên? Nhận xét câu trả lời học sinh. Trả lời: Thủ tục vẽ điểm hình tọa độ (50,50) với màu vàng. Giải thích: Khi vẽ hình chữ nhật có cạnh song song với trục tọa độ, cần xác định hai điểm điểm trái đỉnh phải dưới. procedure SetColor (color: Word);color bảng trang111. +Thủ tục vẽ điểm:procedure PutPixel (x,y: integer;color :word); Trong đó: x y tọa độ điểm cần vẽ; color màu điểm. +Thủ tục vẽ đoạn thẳng: procedure Line( x1, y1, x2, y2: integer); (x1, y1) (x2, y2) tọa độ điểm đầu điểm cuối. +Thủ tục vẽ đoạn thẳng nối điểm (vị trí trỏ) với điểm có tọa độ (x, y):procedure LineTo (x, y: integer); +Thủ tục vẽ đoạn thẳng nối điểm với điểm có tọa độ cộng với gia số (dx, dy) procedure LineRel (dx, dy: integer); d.Các thủ tục hàm liên quan đến vị trí trỏ. Các hàm xác định giá trị lớn tọa độ hình X ,Y: function GetMaxX: integer; function GetMaxY: integer; Thủ tục chuyển trỏ tới tọa độ (x, y): procedure MoveTo(x, y: integer); e)Một số thủ tục vẽ hình đơn giản Vẽ đường tròn có tâm (x, y), bán kính r: procedure Cricle (x, y: integer; r: word); Vẽ cung elip có tâm điểm (x, y) với bán kính trục Xr, Yr từ góc khởi đầu StAngle đến góc kết thúc EndAngle: procedure Ellipse (x, y: integer ;StAngle, EndAngle, Xr, Yr: word); Vẽ hình chữ nhật có cạnh song song với trục tọa độ, (x1, y1) tọa độ đỉnh trái trên, (x2, y2) tọa độ đỉnh phải dưới: procedure Rectangle (x1, y1, x2, y2: integer); 3)Một số thư viện khác + System: Trong thư viện chuẩn chứa hàm sơ cấp thủ tục vào/ra mà chương trình dùng tới. + Dos: Thư viện chứa thủ tục cho phép thực trực tiếp lệnh như: tạo thư mục, thiết lập hệ thống,… GV:Xét ví dụ sau dùng thư + Printer: Thư viện cung cấp thủ tục làm việc với máy in. viện nào? 4)Sử dụng thư việnMuốn sử dụng thủ tục hàm chuẩn Program Ve_hinh; số thu việc (trừ system) cần phải dùng lệnh khai Uses crt, dos, graph; báo: Kết luận câu trả lời học sinh. uses unit1, unit2,…, unitN; => Unit1, unit2,…, unitN tên thư viện, viết cách dấu phẩy 4.Củng cố luyện tập: . Nhắc lại trọng tâm học: c) Nắm nội dung thư viện dùng làm gì. Hiểu hai thư viện CRT GRAPH. d) Cách sử dụng chương trình. 5.Hướng dẫn học sinh tự học nhà:Về nhà Ôn tập cuối năm. V.RÚT KINH NGHIỆM ………………………………………………………………………………………………………………… ………………………………………………………………………………………………………………… ………………………………………………………………………………………………………………… ………………………………………………………………………………………………………………… …………………………………………………………………………………………………………. . 48 Ngày dạy:8/5/2009 BÀI 18: THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN I. Mục Tiêu Bài Dạy: 0 1)Kiến thức. Biết được một số các thư viện chương trình con chuẩn của Pascal. 1 Giới thiệu khả năng đồ họa,. trường Pascal. 2 Sử dụng thư viện chương trình con Crt và Graph. 2)Kỹ năng :Nhận Học sinh nắm được cách khai báo và sử dụng 2 thư viện chương trình con Crt và Graph.Nắm được 2 chế độ làm việc. lớp. 2. Kiểm tra bài cũ: Câu 1:Nêu khái niệm và lợi ích của chương trình con và phân loại? Câu 2:Nêu cấu trúc chương trình con và cho ví dụ? Giáo viên nhận xét câu trả lời của học sinh và cho điểm. 3.