Giáo án môn Tin học 11 - Bài 19: Thư viện chương trình con chuẩn

BAØI 19	THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN
I) MĐYC
 1- Kiến thức: HS naém ñöôïc
- Mỗi NN lập trình đều có thư viện chương trình con chuẩn để mở rộng khả năng ứng dụng.
- Mỗi thư viện có thể bao gồm các chương trình con chuẩn liên quan đến một loại công việc.
- Các NNLT cung cấp những khả năng về quản lí, khai thác và điều khiển các thiết bị vào ra khả năng thực hiện các thao tác đồ hoạ,
 2- Kỉ năng: 
- Sử dụng được các thư viện chương trình con chuẩn
- Dùng các thủ tục và các hàm trong các thư viện crt và graph
- ứng dụng lập trình các bài toán đơn giản
II) PTDH
 - Máy chiếu.
 - Một số bài tập có liên quan đến kiến thức cần thiết cho bài học
II) NỘI DUNG TIẾT DẠY
Tổ chức lớp: Ổn định lớp
Bài cũ:
Tiến trình tiết dạy
Hoạt động của GV
Hoạt động của HS
ĐVĐ:
Mỗi NNLT đều có một số lượng phong phú các chương trình con chuẩn trong các thư viện nhằm mục đích giúp người lập trình thuận lợi hơn trong một số công việc. các thư viện đó là gì, mỗi thư viện như thế có những CT con nào và sự hoạt động của chúng ra sao? Chúng ta cùng tìm hiểu những vấn đều đó.
Nghe
Thư viện CRT
Cho học sinh biết thư viện crt chứa những thủ tục thực hiện những công việc gì.
Câu lệnh clrscr ta có th ấy ở đâu chưa?
Trong caùc chöông trình ñaõ laøm, ôû phaàn khai baùo ta thöôøng thaáy doøng khai baùo naøo? Neáu khoâng coù doøng ñoù thì coù loãi gì khoâng?
Vì sao?
Chaïy thöû moät chöông trình baèng trình chieáu vaø la(m roõ ñieàu ñoù cho HS, trong chöông trình coù ñuû caùc noäi dung chuaån bò trình baøy.
Cụ thể :
Thủ tục: clrscr dùng để xóa màn hình(đã giới thiệu)
Thủ tục Textcolor(color): Đặt màu cho chữ trên màn hình
Color: hằng hoặc biến xác định màu
TextBackround(color): đặt màu cho nền của màn hình.
GotoXY(x,y): đưa con trỏ đến vị trí (x,y). x:cột, y: dòng
Màn hình văn bản gồm 80 cột, 25 dòng
Trình chiếu một chương trình đơn giản bằng NN Pascal, chạy chương trình này giup cho học sinh tháy được việc thực hiện một số thủ tục cơ bản trong thư viên crt
Doøng leänh clrscr ta thöôøng duøng ñeå xoaù maøn hình trong caùc chöông trình tröôùc
uses crt;
neáu khoâng coù thì khi baùo loãi khi thì khoâng
Ghi baûng
THƯ VIỆN GRAPH
Gới thiệu thư viện đồ họa, các hàm và thủ tục trong thư viện này cũng như công dụng của chúng.
Các thiết bị và chương trình hỗ trợ đồ hoạ
* Màn hình: Chế độ làm việc của màn hình
Văn bản: đơn vị của nó là các hình vuông nhỏ, mỗi hình vuông chứa một kí tự văn bản.
đồ họa: đơn vị của nó là điểm ảnh(pixel)
* Bảng mạch diều khiển: bảo đảm tương tác giữa bộ xử lí và màn hình để thực hiện chế độ phân giải và màu sắc.
b) Khởi tạo chế độ đồ họa
* Cho chaïy moät chöông trình ñoà hoaï hoaøn chænh ôû möùc ñoä ñôn giaûn, keát hôïp ñaày ñuû caùc thao taùc veõ hình nhö: veõ ñieåm, ñoaïn thaúng, HCN, ñöôøng troøn, elip, toâ neàn, maøu chöõtreân maùy chieáu.
* Giôùi thieäu töøng caâu leänh, töøng thuû tuïc hoaëc haøm coù saün trong thö vieän GRAPH, thuû tuïc thieát laäp cheá ñoä ñoà hoaï.
Cho HS ghi baøi
Một chương trình đồ họa bao giờ cũng bắt đầu bằng việc 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 đó: 
+ Drive: số hiệu của trình điều khiển
+ mode: số hiệu của độ phan giải
+ path: đường dẫn đến têp BGI.
Chú ý: 
Thông thường ta nên sử dụng cách thiết lập chế độ đồ hoạ tự động với biến driver được gán giá trị là 0 (được định sẵn bằng detect)
 - Để trở về chế độ văn bản ta gọi thủ tục “CloseGraph;”
c) Các thủ tục vẽ điểm, đoạn thẳng
Trong chế độ đồ họa
- Đặt màu: procedure SetColor(color: word);
- Vẽ điểm: procedure PutPixel(x,y: integer; color: word);
- Vẽ đoạn thẳng:
Procedur Line(x1,y1,x2,y2: integer);
- Vẽ đoạn thẳng nối điểm hiện tại với điểm có toạ dộ (x,y)
Procedur Line(x,y : integer);
d) Caùc thuû tuïc vaø haøm lieân quan ñeán vò trí con troû
 - function GetMaxX: integer;
 - function GetMaxY: integer;
 - procedure MoveTo(x,y: integer);
 e) Moät soá thuû tuïc veõ hình ñôn giaûn
 - veõ ñöôøng troøn
Procedure Circle(x,y: integer; r: word);
veõ cung cuûa elip
Procedure Ellipse(x,y: integer; StAngle, EndAngle,Xr,Yr: word);
veõ hình chöõ nhaät
procedure Rectangle(x1,y1,x2,y2: integer);
* Hoûi: Trong chöông trình treân caùc thuû tuïc hoaëc haøm coù gì khaùc nhau so vôùi SGK?
Coøn gì thaéc maéc nöõa?
* Giaûi thích caùc thaéc maéc cho HS
*Giaûi thích caùc doøng leänh sau trong CT
Driver:=0;
InitGraph(Driver, mode, ‘C:\TP\BGI’);
3) MOÄT SOÁ THÖ VIEÄN KHAÙC:
System
Dos
Printer
4) SÖÛ DUÏNG THÖ VIEÄN
Vieát laïi doøng khai baùo moät thö vieän naøo ñoù ñaõ gaëp?
Khai baùo ñeå ñöôïc söû duïng thö vieän
uses unit1, unit2, unit3,..;
Uses : Töø khoùa
Unit1,unit2, teân caùc thö vieän
Chuù yù:
Moïi thö vieän ñeàu phaûi khai baùo tröø thö vieän System
Trong phaàn khai baùo thì khai baùo thö vieän phaûi tröôùc tieân
lắng nghe
Laéng nghe vaø ghi baûng
Laéng nghe vaø ghi laïi nhöõng ñieåm quan troïng trong chöông trình maø GV ñaõ trình baøy.
Tieáp tuïc ghi laïi nhöõng thuû tuïc caàn thieát maø GV trình baøy.
Trong chöông trình ñaõ thöïc hieän chæ coù lôøi goïi thuû tuïc. Vì sao noù ñöôïc thöïc hieän maø khoâng coù thuû tuïc cuï theå?
Duøng ñeå thieát laäp cheá ñoä ñoà hoïa
Nghe, hieåu
Uses crt;
Nghe, hieåu, ghi baøi
4) CUÛNG COÁ
Thaûo luaän theo nhoùm
Baøi taäp: Vieát chöông trình xuaát ra maøn hình moät tam giaùc baát kyø phía treân coù doøng chöõ maøu ñoû ÑAÂY LAØ MOÄT TAM GIAÙC
GV nhaän xeùt qua keát quaû cuûa HS
5)KHAÙI QUAÙT
Trình chieáu laïi noäi dung baøi ñaõ hoïc.