Bài giảng môn Tin học khối 11 - Bìa 19: Thư viện chương trình con chuẩn

NhiÖt liÖt Chµo mõng c¸c thÇy c« gi¸o tíi dù giê t¹i líp 11a2 m«n: tin häc - Gi¸o viªn: Bïi Hång Nga KiÓm tra bµi còChµo mõng c¸c thÇy c« gi¸o tíi dù giê t¹i líp 12a4 Đáp án- Thủ tục CLRSCR thực hiện xoá nội dung đang có trên màn hình.- Thủ tục này nằm trong thư viện CRT, cho nên sau tên chương trình phải khai báo : Uses CRT;2. Thủ tục Clrscr thực hiện công việc gì? Thủ tục này nằm trong thư viện nào?Mỗi ngôn ngữ lập trình đều có một số lượng phong phú các chương trình con chuẩn (chương trình con thông dụng, đã được lập trình sẵn) trong các thư viện !TiÕt 48§19THƯ VIỆNM(x,y)xycột (1-80)dòng (1-25) TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 1. CRTChứa các thủ tục:- Xoá màn hình: Clrscr; - Đặt màu chữ: Textcolor(color); - Đặt màu nền chữ: Textbackground(color); Đặt con trỏ ở vị trí (x,y): GotoXY(x,y);{chỉ số cột: 1≤x ≤ 80; chỉ số dòng 1 ≤ y ≤ 25} Bài tập 1: Viết các câu lệnh thực hiện các việc sau:- Đặt nền màu xanh lá- Từ toạ độ (20,5), viết dòng chữ: “Truong THPT Phong Chau” với màu đỏTừ toạ độ (19,7), viết dòng chữ “THI DUA DAY TOT HOC TOT !” với màu vàng ?Thư viện CRT chứa các thủ tục liên quan đến việc quản lí và khai thác màn hình, bàn phím của máy tính.Minh họaThư viện CRT chứa các thủ tục liên quan đến việc gì? Đó là những thủ tục nào? TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 2. GRAPHa) Các thiết bị và chương trình hỗ trợ đồ hoạ : (SGK trang 111)- Màn hình có 2 chế độ làm việc:+ Chế độ văn bản: đơn vị cơ sở là kí tự trong ASCII (là chế độ mặc định của TP)+ Chế độ đồ hoạ: đơn vị cơ sở là điểm ảnh (pixel) mỗi điểm ảnh được xác định bởi toạ độ (x,y)Thư viện CRT chứa các thủ tục liên quan đến chế độ đồ họa của các loại màn hình và các thao tác đồ họa cơ bản: vẽ điểm, đường, tô màu- Tên gọi của bảng mạch điều khiển màn hình thường trùng với loại màn hình:VGA, SVGA, M(x,y)xy640480VGAThư viện CRT chứa các thủ tục liên quan đến việc gì? TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 2. GRAPHb) Khởi tạo chế độ đồ hoạ- Thủ tục khởi tạo: InitGraph(var driver, mode:integer; path:string); Thông thường: 	Driver:=0;	Initgraph (driver, mode, ‘C:\Tp\BGI’); - Thủ tục kết thúc: CloseGraph; c) Các thủ tục vẽ điểm, đoạn thẳng Đặt màu cho nét vẽ: Setcolor(color: word);	VD: Setcolor(blue);Vẽ điểm: Putpixel(x,y:Integer; color: word);(x1,y1)(x2,y2)Các thủ tục vẽ đoạn thẳng:Line(x1,y1,x2,y2: Integer);LineTo(x,y:integer);LineRel(dx,dy: integer);dxdy TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 2. GRAPHd) Các thủ tục và hàm liên quan đến vị trí con trỏ:Hàm xác định độ phân giải màn hình: GetMaxX:Integer; GetMaxY: Integer;Thủ tục chuyển con trỏ tới tọa độ (x, y);	 MoveTo(x, y:Integer);Bài tập 2 (Thảo luận nhóm trong 3phút) -Thực hiện vẽ đoạn thẳng nối điểm A(60,40) và điểm B(80,75) bằng nhiều cách khác nhau?Giải bài tập 2{Cách 1:} Line(60,40,80,75);{Cách 2:} Moveto(60,40);	 Lineto(80,75);{Cách 3:} Moveto(60,40);	 LineRel(20,35); ĐÁP ÁN(x,y)XrYr TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 2. GRAPHe) Một số thủ tục vẽ hình đơn giản:Vẽ đường tròn tâm (x,y) bán kính r: Circle(x, y:integer; r: word);Vẽ cung của Elip tâm (x,y), bán kính trục Xr, Yr, từ góc khởi đầu StAngle đến góc kết thúc EndAngle:Ellipse(x,y:integer;stAngle, EndAngle,Xr, Yr: word);Vẽ hình chữ nhật: Rectangle(x1,y1,x2,y2:Integer);(x1,y1)(x2,y2)VD: Circle(30,40,25);VD: Ellipse(90,45,60,150,36,25);VD: Rectangle (50,75,92,94); TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN 3. Mét sè th­ viÖn kh¸c:System: Chứa các hàm sơ cấp và các thủ tục vào/ra mà các chương trình đều dùng tới.(nên không cần khai báo tên thư viện)Dos: Chứa các thủ tục cho phép thực hiện trực tiếp các lệnh như tạo thư mục, thiết lập ngày giờ hệ thống,Printer: Cung cấp các thủ tục làm việc với máy in.4. Sö dông th­ viÖnMuốn sử dụng các thủ tục và hàm chuẩn của (một số) thư viện nào đó (trừ System) phải dùng lệnh khai báo: Uses unit1, unit2, ,unitN;VD: Uses CRT, graph, frinter; TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN cñng cèCRT: - Clrscr; 	- Textcolor(color); 	 - Textbackground(color);	- GotoXY(x,y);2. GRAPH: * InitGraph(var driver, mode:integer; path:string);Setcolor(color: word);	 - Putpixel(x,y:Integer; color: word);- Line(x1,y1,x2,y2: Integer);	 - LineTo(x,y:integer); LineRel(dx,dy: integer);	 - GetMaxX:Integer;	 - GetMaxY: Integer;- MoveTo(x, y:Integer);- Circle(x, y:integer; r: word);- Ellipse(x,y:integer;stAngle, EndAngle,Xr, Yr: word);- Rectangle(x1,y1,x2,y2:Integer);	 * CloseGraph; TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN cñng cèBài tập 3: Cho biết kết quả của chương trình sau?Uses graph;Var drive,mode:integer;BEGIN	Drive:=0;	Initgraph(drive, mode, ‘C:\Tp\BGI’);	Setcolor(3);	Circle(112,40,30);	Setcolor(14);	Ellipse(50,90,0,360,30,20);	Setcolor(5);	Rectangle(151,150,201,200);	Readln;	CloseGraph;END. ĐÁP ÁN- 1 đường tròn màu xanh lơ - 1 hình elip màu vàng - 1 hình vuông màu tímXEM ĐÁP ÁNMinh họa TiÕt 48. §19- THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN cñng cèBài tập 4: Cho biết kết quả của chương trình sau? -Uses graph;Var drive,mode:integer;BEGIN	Setcolor(3);	Circle(12,40,30);	CloseGraph;END. ĐÁP ÁNchương trình bị lỗi vì chưa khởi tạo chế độ đồ hoạ: Drive:=0; Initgraph(drive, mode, ‘c:\Tp\BGI’);bµi tËp vÒ nhµ Học kĩ lý thuyết, thuộc các thủ tục, hàm chuẩn.Chuẩn bị nội dung Bài tập và thực hành số 8XEM ĐÁP ÁNKÝnh chóc c¸c thÇy gi¸o, c« gi¸o m¹nh khoÎ, c«ng t¸c tèt ! m«n: tin häc - Gi¸o viªn: Bïi Hång Nga chóc c¸c em häc sinh m¹nh khoÎ, häc tËp tiÕn bé ! Xin tr©n träng c¶m ¬n !