Giáo án tin học lớp 11:

Bài số 19: THƯ VIỆN CHƯƠNG TRÌNH CON CHUẨN

Ngày soạn :
Ngày dạy :
Giáo viên hướng dẫn: Thầy: Trần Doãn Vinh
Sinh viên: Nguyễn Thị Hằng
Lớp: k56a_CNTT
Trường: ĐHSP Hà Nội.

A. MỤC ĐÍCH YÊU CẦU :
1. Kiến thức:
Giới thiệu sơ lược nội dung của một số thư viện chương trình con
chuẩn của Pascal, thông qua đó học sinh biết được:
Mỗi ngôn ngữ lập trình đều có cá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 ngôn ngữ lập trình cung cấp những khả năng về quản lí,
khai thác và điều khiển thiết bị vào/ra khả năng thực hiện các
thao tác đồ họa….
2. Kỹ năng:
 Bước đầu sử dụng được các thư viện đó trong lập trình.
 Khởi động được chế độ đồ họa.
 Sử dụng được các thủ tục vẽ điểm, đường, hình tròn,
hình elipse, hình chữ nhật.

B.PHƯƠNG PHÁP, PHƯƠNG TIỆN:
1. Phương pháp:
Thuyết trình kết hợp với giảng giải.

Dãy câu lệnh: được viết giữa cặp tên riêng Begin và End
tạo thành thân của thủ tục.
Cấu trúc thủ tục:
Procedure <tên thủ tục> [<danh sách tham số>]
[< phần khai báo >]
Begin
< dãy các câu lệnh >
End;

b) Gợi động cơ: (3phút)
Xét chương trình Pascal sau:

Program cuuchuong;
Uses crt ;
var A : Array[1 9,1 9] of Integer ;
i, j : Byte ;

Begin
Clrscr ;
Writeln('Bang cuu chuong 1 -> 9 : ');
Writeln ;
For i := 1 to 9 do
For j := 1 to 9 do
A[i,j] := i*j ;
For i := 1 to 9 do
Begin
For j := 1 to 9 do Write(a[i,j]:4);
Writeln ;
Writeln ;
End ;


1.1
Một số thủ tục:
- Thủ tục clrscr;
->Đây là thủ tục xóa màn hình.
Câu hỏi : Em hãy cho biết Thư viện Crt
chứa những thủ tục gì ?
Trả lời: Có những thủ tục là:
Clrscr, Textcolor, TextBackground,
GotoXY.

2
phút
1.2
Th
ủ tục
Textcolor

:

đ
ặt

m
àu

cho
Học sinh quan sát và tìm hiểu chương
4
ch

Câu hỏi: Em hã cho biết Chức năng của
lệnh: TextColor(4) là gì?
Trả lời: Chức năng đặt màu cho chữ là
màu đỏ.
Học sinh xem bảng giá tị của Textcolor
trong sgk.

phút
3.3

Th
ủ tục
GotoXY
(x,y)

đư
a con tr
ỏ

tới vị trí cột x, dòng y của màn
hình văn bản. Do màn hình văn
bản gồm 25 dòng và 80 cột nên
phạm vi giá trị của các tham số là
1<=x<=80;1<=y<=25.
Học sinh quan sát và tìm hiểu chương
trình:
Uses Crt;
Begin
Writeln (‘con tror dang dung o vi


5
phút
2
GRAPH:
- Đây là ngôn ngữ chuyên về đồ
họa.
- Thư viện này chứa các hàm, thủ
tục liên quan đến chế độ đồ họa
của các loại màn hình khác nhau
và cho phép thực hiện các thao tác
đồ họa cơ bản
Vd: vẽ điểm, đường, tô màu.

Câu hỏi:
Em hiểu Graph là gì, và nó được
dùng như thế nào?
3
phút
2.1
Các thiết bị và chương trình hỗ
trợ đồ họa :
Màn hình có thể làm việc trong 2
chế độ: chế độ văn bản và chế độ
đồ họa.
- Bảng mạch điều khiển màn hình
là thiết bị đảm bảo tương tác giữa
bộ xử lý và màn hình để thực hiện
các chế độ phân giải và màu sắc.
Tên gọi của bảng mạch điều khiển
thưòng trùng với loại màn hình, ví

Vẽ diểm thực hiện bằng thủ
tục:
Procedure PutpiPPutpixel
(x,y: integer; color: word).

Vẽ đoạn thẳng, xác định tọa
độ 2 điểm đầu và cuối.
Procedure
Line(x1,y1,x2,y2:integer);
Vẽ đoạn thẳng nối điểm
Vẽ điểm và đoạn thẳng là 2 thao tác cơ
bản của đồ họa.

- x và y là tọa độ của diểm.
- Color là màu của điểm.
- (x1, y1) và (x2, y2) là tọa độ của hai
điểm đầu và cuối.
Học sinh quan sát và tìm hiểu chương
trình :
Uses Graph ;
10
phút
hiện tại (vị trí con trỏ) với
điểm có tọa độ (x,y):
Procedure LineTo(x,y:interger);
Vẽ đoạn thẳng nối điểm
hiện tại với điểm có tọa độ
hiện tại cộng với gia
số(dx,dy)
Procedure

Setcolor(4) ;
Circle(12,40,200) ;
Readln ;
End.

2.4
Các thủ tục và hàm liên quan
đến vị trí con trỏ :
Các hàm xác định giá trị lớn
nhất có thể của tọa độ màn
hình X và Y(để biết độ phân
giải màn hình trong chế độ
dồ họa đang sủ dụng):
Function GetMaxX: integer;
Function GetMaxY: integer;
Thủ tục chuyển con trỏ tới
tọa độ(x,y):
Procedure MoveTo(x,y:integer);

5
phút
2.5 Một số thủ tục vẽ hình đơn giản:
Vẽ đường tròn có tâm tại
(x,y), bán kính r.
Trong Pascal có một số thủ tục phải vẽ
hình như hình tròn hình elip. Chúng ta
có một số thủ tục vẽ hình đơn giản.
10
phút
Procedure Circle

Circle(12,40,30);
Ellipse(50,50,30,120,50,100:
word);
Retangle(100,100,200,200);
Readln;
End.
3
Một số thư viện khác:
system: trong thư viện
chuẩn này 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.
Dos: Thư viện này 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 giờ hệ
thống…
Printer: Thư viện này cung
cấp các thủ tục làm việc với
máy in.

Thuyết trình: Có nhiều thư viện để
sử dụng cho chương trình, mỗi thư viện
có một chức năng riêng.
S
ử dụng th
ư vi
ện
:
Muốn sử dụng các thủ tục và hàm
chuẩn của một số thư viện nào đó
phải dùng lệnh khai báo(trừ
system)
Uses unit1, unit 2,…, unit N;
 Uses là từ khóa
 Unit 1, Unit 2,…Unit N là
tên các thư viện.

Các thư viện được viết cách nhau bằng
dấu phẩy.
->Khai báo này là lệnh đầu tiên trong
khai báo (nó chỉ viết sau khai báo
chương trình ).

Ví dụ : Để sử dụng các hàm và các thủ
tục chuẩn trong các thư viện Crt, Dos,
Graph, ta cần khai báo : Uses Crt, Dos,
Graph;
5
phút