Bài 14. Kiểu dữ liệu tệp

Lớp 11A8
Giáo viên: VũThủy Vân
Trường THPT Phú Xuyên A
Chào mừng thầy cô tới dự giờ
Môn: TIN HỌC
KIỂM TRA BÀI CŨ
Viết chương trình nhập mảng một chiều, tính tổng và in mảng vừa nhập.
Chương V. TỆP VÀ THAO TÁC VỚI TỆP
Tiết 38:
§14. KIỂU DỮ LIỆU TỆP
§15. THAO TÁC VỚI TỆP
1. Vai trò của kiểu tệp
Cho biết Kiểu dữ liệu tệp có những vai trò, đặc điểm gì?
Vai trò: Dữ liệu kiểu tệp được lưu trữ lâu dài ở bộ nhớ ngoài để sử dụng về sau.
VD: Đĩa cứng, đĩa mềm, đĩa CD, USB,..
Đặc điểm: Không bị mất khi ngắt điện, lượng thông tin lưu trữ trên tệp có thể rất lớn và chỉ phụ thuộc vào dung lượng bộ nhớ ngoài.
Bài 14. KIỂU DỮ LIỆU TỆP
1. Vai trò của kiểu tệp
Bài 14. KIỂU DỮ LIỆU TỆP
2. Phân loại tệp và thao tác với tệp
Lưu ý: Trong chương trình Phổ thông, ta chỉ xét cách khai báo và các thao tác với tệp văn bản.
* Phân loại tệp:
1. Vai trò của kiểu tệp
Bài 14. KIỂU DỮ LIỆU TỆP
2. Phân loại tệp và thao tác với tệp
* Thao tác với tệp
Có hai thao tác cơ bản đối với tệp:
- Ghi dữ liệu vào tệp
- Đọc dữ liệu từ tệp.
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
Var : Text;
Ví dụ:
tep1,tep2 : Text;
Program vd1;
Uses crt;
Var
tep1,tep2: Text;
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
a. Gắn tên tệp
Assign(,);
Tên tệp: Là biến xâu hoặc hằng xâu.
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.
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
b. Mở tệp
REWRITE () ;
Thủ tục mở tệp để ghi:
Nếu như trên ổ D: chưa có tệp DULIEU.INP, thì tệp sẽ được tạo rỗng. Nếu đã có, thì nội dung cũ bị xoá để chuẩn bị ghi dữ liệu mới.
Program vd1;
Var
tep2: TEXT;
BEGIN
Assign(tep2,‘D:DULIEU.INP’);
Rewrite(tep2);
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
b. Mở tệp
REset () ;
Thủ tục mở tệp để đọc:
Program vd1;
Var
tep2: TEXT;
BEGIN
Assign(tep2,‘D:DULIEU.INP’);
Reset(tep2);
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
c. Đọc/ghi tệp văn bản
Đọc dữ liệu từ tệp
Program vd1;
Var
tep2: TEXT;
a,b,c:integer;
BEGIN
Assign(tep2,‘D:DULIEU.INP’);
Reset(tep2);
Read(, );
hoặc
Readln(, );
READLN (tep2,a,b,c);
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
c. Đọc/ghi tệp văn bản
Ghi dữ liệu ra tệp
Program vd1;
Var
tep2: TEXT;
a,b,c : integer;
BEGIN
Assign(tep2,‘D:DULIEU.INP’);
Rewrite(tep2); a:=9; b:=6;
Write(, );
hoặc
Writeln(, );
Write (tep2,2,’----’,a,a*2+b);
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
* Một số hàm chuẩn thường dùng khi đọc/ghi tệp văn bản
Hàm eof ();
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.
Hàm eoln ();
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.
1. Khai báo
Bài 15. THAO TÁC VỚI TỆP
2. Thao tác với tệp
d. Đóng tệp
Close(< Biến tệp>);
Tác dụng của lệnh:
- Đóng tệp để tránh mất mát thông tin.
- Đây là việc làm cần thiết để đảm bảo an toàn dữ liệu.
KIỂU DỮ LIỆU TỆP VÀ THAO TÁC VỚI TỆP
Bài tập củng cố
Câu 1: Trong Pascal để khai báo biến tệp văn bản ta sử dụng cú pháp
Var : Text;
Var : Text;
Var : string;
Var : string;
I. Hãy chọn phương án trả lời đúng nhất
Câu 2: Để gắn tệp KQ.TXT cho biến tệp f1 ta sử dụng câu lệnh:
f1:=‘KQ.TXT’;
KQ.TXT:=f1;
Assign(‘KQ.TXT’,f1);
Assign(f1, ‘KQ.TXT’);
MẢNG MỘT CHIỀU
Ghi nhớ!
Assign(,);
Reset();
Rewrite();
Write(,); hoặc
Writeln(,);
Read(,);
Hoặc
Readln(,);
Close();
MẢNG MỘT CHIỀU
Bài tập
1. Ghi giá trị của hai biến a,b và tổng a+b vào tệp D:Bai1.Inp.
1. Khai báo
Program Bai1;
Var Tep :Text ;
a,b :Integer ;
Begin
Write(‘ Nhap a,b : ‘); Readln(a,b);
Assign(Tep,’D:Bai1.Inp’) ;
Rewrite(Tep) ;
Write(tep,a,’ ‘,b, ‘ ‘,a+b) ;
Close(tep) ;
Readln;
End.
3. Gắn tên tệp;
4. Mở tệp ra để ghi;
Các bước:
Thể hiện bằng pascal
5. Ghi vào tệp D:Bai1.Inp.
6. Đóng tệp.
2. Nhập a,b