TRƯỜNG THPT LÊ THẾ HIẾU
TỔ LÝ- TIN
CHÀO
MỪNG
QUÝ
THẦY
CÔ
GIÁO
ĐẾN THAM
LỚP
11B4

GV: Thái Sanh
KIỂM TRA BÀI CŨ
THÍ SINH DỰ THI
SBD:………………………………
Họ và tên:………………………
Năm sinh:………………………
Điểm:…………………………….
Câu hỏi: Hãy khai báo một kiểu bản ghi theo mẫu sau:
§14-15: KIỂU DỮ LIỆU TỆP & CÁC THAO TÁC VỚI KIỂU DỮ LIỆU TỆP
FILE
Tiết 36
1- VAI TRÒ CỦA DỮ LIỆU TỆP
Dữ liệu kiểu tệp được lưu trữ lâu dài ở bộ nhớ ngoài và không bị mất khi tắt nguồn điện.
Lượng thông tin lưu trữ trên tệp chỉ phụ thuộc vào dung lượng đĩa.
2- PHÂN LOẠI TỆP
Tệp định kiểu
Tệp văn bản
Là tệp mà các phần tử có cùng một kiểu. Số lượng phần tử không xác định trước.
Gồm các kí tự được phân chia thành một hoặc nhiều dòng.
Trong phạm vi chương trình chỉ nghiên cứu tệp văn bản.
3- CÁC THAO TÁC VỚI TỆP VĂN BẢN
3.1 KHAI BÁO TỆP VĂN BẢN
Var : TEXT;
Ví dụ:
Var tep1,tep2 : Text;
Program vd1;
Uses crt;
Var
tep1,tep2: TEXT;

3.2 GẮN TÊN CHO BIẾN TỆP
ASSIGN(,);
Tên tệp: Là biến xâu hoặc hằng xâu cú d? d�i nh? hon 97 kớ t?
ASSIGN(tep1, ‘DULIEU.DAT’);
ASSIGN(tep2, ‘D:TPBAITAP.INP’);
Ví dụ:
Biến tep1 được gắn với tệp có tên DULIEU.DAT
Biến tep2 được gắn với tệp có tên BAITAP.INP trong thư mục TP ở ổ đĩa D.
3.3 MỞ TỆP ĐỂ GHI DỮ LIỆU
REWRITE ();
Lưu ý: Nếu như trên ổ D: chưa có tệp vidu.doc thì tệp sẽ được tạo rỗng. Nếu đã có, thì tệp cũ bị xoá và tạo tệp mới để chuẩn bị ghi dữ liệu.
Program vd1;
Var
tep1,tep2: TEXT;
BEGIN
ASSIGN(tep2,‘D:vidu.doc’);
REWRITE (tep2);
3.4 CÁCH GHI DỮ LIỆU VÀO TỆP
BEGIN
? Danh sỏch k?t qu? g?m m?t hay nhi?u ph?n t?. Ph?n t? cú th? l� bi?n, h?ng xõu ho?c bi?u th?c.
WRITE(, );
WRITELN (, );
WRITE (tep2,2,’ ’,6,’ ’,4,’ ‘,9, ‘t’);
Lưu ý: Để xem kết quả, mở tệp D:Vidu.doc.
3.5 MỞ TỆP ĐỂ ĐỌC DỮ LIỆU
BEGIN
RESET ();
a. Mở tệp để đọc dữ liệu
b. Đọc dữ liệu từ tệp
Read(, );
Readln(, );
Ctrl + F9
3.6 ĐÓNG TỆP
CLOSE(< Tên biến tệp>);
Close(tep2);
4- CÁC HÀM CHUẨN
a. Hàm eof ();
b. Hàm eoln ();
Cho biết con trỏ tệp đã ở vị trí cuối tệp hay chưa. Nếu trỏ tệp ở cuối tệp thì hàm EOF trả lại giá trị TRUE.
Cho biết con trỏ tệp đã ở vị trí cuối dòng hay chưa. Nếu trỏ tệp ở cuối dòng thì hàm EOLN trả lại giá trị TRUE.
Chú ý: Đối với tệp không cần xác định trước số lượng phần tử.
BÀI TẬP LIÊN HỆ
Bài 1: Viết chương trình tạo tệp tep1.TXT nằm ở ổ đĩa D:TS sau mở và ghi vào tệp dòng chữ: `Day la thao tac voi kieu du lieu tep dau tien cua toi`
HDẫn:
+ Khai báo biến tệp f, biến xâu St chứa dòng chữ cần ghi vào tệp.
+ Gắn tên cho biến f là `D:TS ep1.Txt`
+ Mở tệp f để ghi
+ Ghi bằng cách Write(f,st);
+ Đóng tệp f
BÀI TẬP CŨNG CỐ
Bài 2: Viết chương trình đọc các số trong tệp songuyen.txt và viết kết quả ra màn hình
HDẫn:
+ Khai báo biến tệp f
+ Gắn tên cho biến f là `D:TSsonguyen.Txt`
+ Mở tệp f để đọc
+ Trong khi chưa kết thúc tệp thì đọc kết quả vào biến a bằng câu lệnh Read(f,a);
+ Ghi a ra màn hình Write(a); Dừng để xem
+ Đóng tệp f
Chân thành cảm ơn!