mattroimocphiadong_87
New Member
Download miễn phí Giáo án Tin - Tệp và thao tác với tệp
* Mở tệp.
• Asign
(
• VD: Asign(tep, '11A.DAT');
Program MOTEP;
Uses crt;
Var tep : text;
Begin clrscr;
Asign (tep, ‘D:\TP\BAITAP’
Rewrite(tep);
Nếu ở đây nếu như trên ổ D chưa có tệp mang tên 'BAITAP.INP' thì nó sẽ được tạo ra rỗng. Nếu đã có thì nội dung sẽ bị xóa để chuẩn bị nghi mới nội dung
http://cloud.liketly.com/flash/edoc/jh2i1fkjb33wa7b577g9lou48iyvfkz6-swf-2014-02-25-giao_an_tin_tep_va_thao_tac_voi_tep.w4ufFhCAl5.swf /tai-lieu/de-tai-ung-dung-tren-liketly-59430/
Để tải bản Đầy Đủ của tài liệu, xin Trả lời bài viết này, Mods sẽ gửi Link download cho bạn sớm nhất qua hòm tin nhắn.
Ai cần download tài liệu gì mà không tìm thấy ở đây, thì đăng yêu cầu down tại đây nhé:
Nhận download tài liệu miễn phí
Tóm tắt nội dung tài liệu:
Bài 14,15:TỆP VÀ THAO TÁC VỚI TỆP
.Đặc điểm của kiểu dữ liệu tệp và phân 1
loại kiểu tệp.
*Kiểu DL tệp:
-Để lưu trữ DL ta phải lưu nó ở bộ nhớ ngoài
thông qua kiểu tệp và DL sẽ không bị mất khi
mất điện.
-Lưu kượng thông tin lớn phụ thuộc vào
dung lượng của đĩa.
*Phân loại:
-Tệp cấu trúc:là tệp mà các phần tử của nó được xắp
xếp theo một cấu trúc nhất định(vd:cùng kiểu..).
-Tệp văn bản:là tệp mà dữ liệu được nghi dười dạng
các kí tự trong bảng mã ASCII.
Ví dụ về thiết bị lưu trữ ngoài.
USB, ĐĨA TỪ, CD, ..
2.KHAI BÁO TỆP VĂN BẢN
• Var : text;
• Vd: Var tep1,tep2 : text;
3. Thao tác với tệp
GÁN TÊN TỆP
MỞ TỆP ĐỂ GHI MỞ TỆP ĐỂ ĐỌC
GHI DỮ LIỆU VÀO
TỆP
ĐỌC DỮ LIỆU TỪ
TỆP
ĐÓNG TỆP
*GÁN TÊN TỆP
Asign (,).
VD: Asign(tep, '11A.DAT');
Biến tep được gan tên 11A.DAT
Asign(tep1, 'D:\SETUP\TP\BAITAP.INP');
Biến tep1được gán tên BAITAP.INP và
nằm trong thư mục TP của thư mục
SETUP trong ổ D
* Mở tệp.
•Asign
(,).
• VD: Asign(tep,
'11A.DAT');
Program MOTEP;
Uses crt;
Var tep : text;
Begin clrscr;
Asign (tep, ‘D:\TP\BAITAP’);
Rewrite(tep);
Nếu ở đây nếu như
trên ổ D chưa có tệp
mang tên
'BAITAP.INP' thì nó sẽ
được tạo ra rỗng. Nếu
đã có thì nội dung sẽ
bị xóa để chuẩn bị
nghi mới nội dung.
* Thủ tục ghi dữ liệu ra tệp.
•*Ghi tệp:
• Write (,);
• Writeln(,);
DS kết quả ở đây có thể là
một hay nhiều phần tử. Phần
tử ở đây có thể là biến, hằng
xâu hay biểu thức.
Vd:
Program VD1;
Uses crt;
Var tep1: text;
a,b: integer;
Begin
Clrscr;
Asign (tep1 , D:\TINHOC');
Rewrite(tep1);
a:=7; b:=9;
write ( tep1 , a ,' ', b);
Close(tep1);
Readln;
And.
Giá trị hai biến a=7, b= 9
được ghi trong tệp TINHOC
trong ổ D
* Đọc dữ liệu từ tệp.
• - Mở tệp để đọc dữ liệu:
• Reset ();
• - Đọc DL từ tệp:
• Read(,);
• Readln(,);
Begin
Clrscr;
Asign (tep,'D:\TINHOC.INP');
Reset (tep);
Readln(tep,x,y);
Write(' Hai so do la : ',x,' ',y);
Close (tep);
Readln;
End.
DS biến có thể là
một hay nhiều
biến đơn.
*Thủ tục đóng tệp.
Close ();
•* Các hàm thường dùng khác
• -
Eof();
\\ có giá trị đúng khi con trỏ đang ở vị trí cuối trệp.
Eofln();
\\ có giá trị đúng khi con trỏ đang chỉ ở vị trí cuối dòng.
CHÚ Ý
•-Cách khai báo tệp văn bản:
• Var : text;
• -Gán tên tệp:
• Asign
(,);
• -Mở tệp:
• -Đọc: Reset ();
• -Ghi: Rewrite();
• -Đọc ghi tệp:
• +Đọc:
Read(,
• +Ghi:
Rewrite(,
• -Đóng tệp:
• Close ();
...