Vai trò kiểu tệp I.Kiểu dữ liệu tệp: II.Khai báo tệp văn bản 1.Khai báo tệp:... ASSIGNtep1, ‘DULIEU.DAT’; ASSIGNtep2, ‘D:\TP\BAITAP.INP’; Ví dụ: Biến tep1 được gắn với tệp có tên DULIEU
Trang 1cùng tất cả các em học sinh
thân mến!
Lớp giảng dạy: 11B1 Giáo viên :Đoàn Xuân Nhật Ngày soạn:09/03/2010.
Trang 2Câu hỏi:
Thông tin một nhân viên gồm:mã
nhân viên,họ tên nhân viên,năm
sinh,nơi sinh,giới tính,lương phụ
cấp,lương chính thức,tổng lương
Tổng lương =Lương phụ cấp+Lương
chính thức
Viết đoạn chương trình khai báo về
thông tin của nhân viên trên
Program nhan_vien;
Use crt;
Const max= 100;
Type nhanvien= Record
maNV: string[8];
{Mã nhân viên}
tenNV: string [31];
{Tên nhân viên}
namsinh: word ;
{năm sinh nhân viên}
noisinh: string [50];
{Nơi sinh nhân viên}
gioitinh: Boolean ;
{giới tính}
LPC,LCT,TL: Real ;
{Lương phụ cấp,lương chính thức,tổng lương}
TL:= LPC + LCT;
End ;
Trang 3Gi¸o ¸n ®iÖn tö tin häc líp 11
Trang 4I.Kiểu dữ liệu tệp:
1 Vai trò kiểu tệp
Dữ liệu kiểu tệp được lưu trữ lâu dài ở bộ nhớ ngoài (đĩa từ, CD, ) 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 có thể rất lớn và chỉ phụ thuộc vào dung lượng đĩa.
Trang 5Có hai loại tệp thường dùng:
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.
Dưới đây ta chỉ xét các khai báo và làm việc với tệp văn bản
2.Phân loại tệp
I.Kiểu dữ liệu tệp:
1 Vai trò kiểu tệp
Trang 62. Phân loại tệp
Var <Tên biến tệp> : TEXT;
Ví d : ụ:
tep1,tep2 : Text;
Var
tep1,tep2: TEXT;
1 Vai trò kiểu tệp
I.Kiểu dữ liệu tệp:
II.Khai báo tệp văn bản
1.Khai báo tệp:
Trang 72 Gắn tên tệp ASSIGN (<BIẾN TỆP>,<TÊN TỆP>);
Tên tệp : Là biến xâu hoặc hằng xâu.
ASSIGN(tep1, ‘DULIEU.DAT’);
ASSIGN(tep2, ‘D:\TP\BAITAP.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.
Trang 83 M t p ở tệp ệp
REWRITE (<biến tệp>);
Thủ tục mở tệp để ghi kết quả: Program vd1;
Uses crt;
Var tep1,tep2: TEXT;
BEGIN Clrscr;
ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);
REWRITE (tep2);
Nếu như trên ổ D:\TP chưa có
tệp BAITAP.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.
Trang 9 Thủ tục ghi dữ liệu ra tệp
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.
4 Ghi dữ liệu ra tệp Program vd1;
Uses crt;
Var tep2: TEXT;
a,b: integer;
ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);
REWRITE ( tep2) ;
WRITE (tep2,a,b);
a:=7; b:=9;
BEGIN
Clrscr;
Close(tep2);
Readln;
END.
WRITE (<Biến tệp>, <Danh sách kết quả>);
WRITELN (<Biến tệp>, <Danh sách kết quả>);
Trang 10Giá trị hai biến a=7, b=9 được ghi ở trong tệp BAITAP.INP.
Trang 11RESET (<biến tệp>);
Thủ tục mở tệp để đọc dữ liệu
Thủ tục đọc dữ liệu từ tệp:
5 Đọc dữ liệu từ tệp Program vd2;
Uses crt;
Var tep2: TEXT;
x1,y1: integer;
ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);
RESET ( tep2) ;
READLN (tep2,x1,y1);
BEGIN
Clrscr;
Close(tep2);
Readln;
END.
WRITE ( ‘Hai so do la’ ,x1,y1) Hai so do la ,x1,y1) ’ ,x1,y1) ;
READ (<Biến tệp>, <Danh sách biến>);
Danh sách biến là một hoặc
nhiều biến đơn.
READLN (<Biến tệp>, <Danh sách biến>);
Trang 12Program vd1;
Uses crt;
Var tep2: TEXT;
a,b: integer;
BEGIN
Clrscr;
ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);
REWRITE (tep2);
WRITE (tep2,a,b);
a:=7; b:=9;
Readln;
END.
Close(tep2);
BEGIN
Clrscr;
ASSIGN(tep2, ‘D:\TP\BAITAP.INP’);
READLN(tep2, a,b);
WRITE (‘Hai so do la’ ,a,b);
Readln;
END.
Program vd2;
Uses crt;
Var tep2: TEXT;
a,b: integer;
RESET (tep2);
6 Thủ tục đóng tệp
Trang 137 Một số hàm chuẩn thường dùng trong xử lí tệp văn bản
EOF(<biến tệp>);
Cho giá trị đúng nếu con trỏ đang chỉ tới cuối tệp.
EOLN(<biến tệp>);
Cho giá trị đúng nếu con trỏ đang chỉ tới cuối dòng.
Trang 14Thầy Đinh Nguyên Thanh Tú (st) – CENTEA Data chưa rõ nguồn gốc
Nếu quý thầy cô/ cơ quan nào là tác giả của chương trình xin liên hệ với chúng tôi
Khai báo tệp văn bản:
Var < Tên biến tệp>: Text;
Gắn tên tệp:
ASSIGN(<tên biến tệp>);
Mở tệp:
- Để đọc: RESET(<Tên biến tệp>);
- Để ghi: REWRITE(< Tên biến tệp>);
Đóng tệp
CLOSE< tên biến tệp >);
Đọc/ghi tệp
Đọc: READ(<Tên biến tệp>, biến nhận);
Ghi: REWRITE(< Tên biến tệp>,biến đưa ra);
Dưới đây là bảng mô tả cấu trúc tệp!
Trang 15Gắn tên tệp
Đóng tệp
Mô hình thao tác với tệp
I.Kiểu dữ liệu tệp:
II.Khai báo tệp văn bản
Trang 162. Phân loại tệp
1 Vai trò kiểu tệp
I.Kiểu dữ liệu tệp:
BÀI TẬP CỦNG CỐ
Câu 1: Bạn hãy cho biết để mở 1 tệp để ghi dữ liệu, ta dùng lệnh…
a)OPEN b)READLN c)ASSIGN d)REWRITE
II.Khai báo tệp văn bản
1.Khai báo tệp:
2 Gắn tên tệp
3 Mở tệp
4 Ghi dữ liệu ra tệp
5 Đọc dữ liệu từ tệp
6 Thủ tục đóng tệp
7 Một số hàm chuẩn thường
dùng trong xử lí tệp văn bản
Trang 17BÀI TẬP CỦNG CỐ
Câu 2: Để gắn tên tệp ta dùng lệnh…
a)RENAME b)ASSIGNS c)ASSIGN d)RESET
2. Phân loại tệp
1 Vai trò kiểu tệp
I.Kiểu dữ liệu tệp:
II.Khai báo tệp văn bản
1.Khai báo tệp:
2 Gắn tên tệp
3 Mở tệp
4 Ghi dữ liệu ra tệp
5 Đọc dữ liệu từ tệp
6 Thủ tục đóng tệp
7 Một số hàm chuẩn thường
dùng trong xử lí tệp văn bản
Trang 18BÀI TẬP CỦNG CỐ
Câu 3: Vai trò,đặc điểm của kiểu
dữ liệu tệp là …
a)Lưu trữ được khối lượng lớn dữ liệu,sẽ bị mất khi tắt máy.
b)Phụ thuộc vào dung lượng đĩa c)Được lưu trữ lâu dài và không bị mất khi máy tắt.
d)Tất cả đều đúng e) b,c đúng
2. Phân loại tệp
1 Vai trò kiểu tệp
I.Kiểu dữ liệu tệp:
II.Khai báo tệp văn bản
1.Khai báo tệp:
2 Gắn tên tệp
3 Mở tệp
4 Ghi dữ liệu ra tệp
5 Đọc dữ liệu từ tệp
6 Thủ tục đóng tệp
7 Một số hàm chuẩn thường
dùng trong xử lí tệp văn bản
Trang 19Xin chân thành cảm ơn quý thầy cô!
Chúc thầy cô cùng cả lớp vui
vẻ,mạnh khỏe và thành đạt!