Nếu như trên ổ D:\TP chưa có file BAITAP.INP, thì file sẽ được tạo với nội dung rỗng. Nếu đã có thì nội dung cũ sẽ bị xóa để chuẩn bị ghi dữ liệu mới..[r]
Trang 2BÀI 15
THAO TÁC VỚI FILE
Thời gian 1/2 tiết
Trang 31 KHAI BÁO BIẾN FILE VĂN BẢN
Cấu trúc khai báo biến file văn bản
VAR <tên biến file> : text;
VAR < tên biến file> : text;
Ví dụ:
Var tep1,tep2 : text ;
Trang 42 THAO TÁC VỚI FILE
Gắn tên file
Mở file để ghi Mở file để đọc
Ghi dữ liệu vào file Đọc dữ liệu từ file
Đóng file
Trang 5GẮN TÊN FILE
Cấu trúc thủ tục gắn tên file
ASSIGN (<tên biến file>,<tên file>);
ASSIGN (<tên biến file>,<tên file>);
Tên file: Biến xâu hoặc hằng xâu
Biến tep2 được gắn với file có
tên BAITAP.INP trong thư mục
TP ở ổ đĩa D.
Trang 6MỞ FILE ĐỂ GHI DỮ LIỆU
Cấu trúc thủ tục mở file để ghi dữ liệu
REWRITE (<tên biến file>);
REWRITE (< tên biến file>);
Nếu như trên ổ D:\TP chưa có file BAITAP.INP, thì file sẽ được tạo với nội dung rỗng Nếu đã có thì nội dung cũ sẽ bị xóa để chuẩn bị ghi dữ liệu mới.
Trang 7Rewrite(tep2);
Trang 8MỞ FILE ĐỂ ĐỌC DỮ LIỆU
Cấu trúc thủ tục mở file để đọc dữ liệu
RESET (<tên biến file>);
RESET (< tên biến file>);
Trang 9Reset(tep2);
Trang 10GHI DỮ LIỆU VÀO FILE
Cấu trúc thủ tục ghi dữ liệu vào file
WRITE (<tên biến file>, <danh sách kết quả>);
WRITE (< tên biến file >, < danh sách kết quả>);
<Danh sách kết quả> gồm một hay hai nhiều
phần tử Phần tử có thể là biến, hằng xâu hay biểu thức.
WRITELN (<tên biến file>, <danh sách kết quả>);
WRITELN (< tên biến file >, < danh sách kết quả>);
Trang 11Write(tep2,a,b); a,b: integer;
Trang 12Giá trị hai biến a=3, b=5 được ghi ở trong file BAITAP.INP.
Trang 13ĐỌC DỮ LIỆU TỪ FILE
Cấu trúc thủ tục đọc dữ liệu từ file
READ (<tên biến file>, <danh sách biến>);
READ (< tên biến file >, < danh sách biến>);
<Danh sách biến> gồm một hay hai nhiều tên
biến đơn
READLN (<tên biến file>, <danh sách biến>);
READLN (< tên biến file >, < danh sách biến>);
Trang 14Readln(tep2,x,y); x,y: integer;
Write(‘Hai so la: ,x,y);
Trang 15ĐÓNG FILE
Cấu trúc thủ tục đóng file
CLOSE (<tên biến file>);
CLOSE (< tên biến file>);
Trang 16Chương trình đọc dữ liệu từ file
Close(tep2);
Trang 17Chương trình ghi dữ liệu vào file
Close(tep2);
Trang 183 CÁC HÀM CHUẨN THƯỜNG DÙNG
Cấu trúc các hàm chuẩn thường dùng
trong khi đọc/ghi file văn bản
EOF (<tên biến file>);
EOF (< tên biến file>);
EOFLN (<tên biến file>);
EOFLN (< tên biến file>);
Hàm EOF trả về giá trị True nếu con trỏ file
đang chỉ tới cuối file
Hàm EOFLN trả về giá trị True nếu con trỏ file
đang chỉ tới cuối dòng
Trang 19Gắn tên file
Mở file để ghi Mở file để đọc
Ghi dữ liệu vào file Đọc dữ liệu từ file
Đóng file
Assign(<biến file>,<tên file>);
Rewrite(<biến file>); Reset(<biến file>);
Close(<biến file>);
Trang 21Thực hiện tháng 02 năm 2008
E_mail: dhhoang03@yahoo.co.uk