Bài 14_15 Tệp và thao tác với tệp

Giáo án điện tử tin học lớp 11 Chương V: TỆP VÀ THAO TÁC VỚI TỆP Ngày soạn: 12/03/2009 Tiết: 36 Bài 14-15 Giáo án điện tử tin học lớp 11 Bài 14: Kiểu liệu tệp Vai trị kiểu tệp Em chobài tốn kiểu Với số biết DL có khối lượng DL từ có yêu cầu lưu trữ để xử DL lớn, trước đến ta sử dụng lí lưu trữ ởphải có kiểu DL tệp nhiều lần, cần loại nhớ ta thựcVai trị kiểu tệp? Vì chương trình? em biết điều đó? Dữ liệu kiểu tệp lưu trữ lâu dài nhớ ngồi (đĩa từ, CD, ) khơng bị tắt nguồn điện Lượng thông tin lưu trữ tệp lớn phụ thuộc vào dung lượng đĩa Phân loại tệp thao tác với tệp: - Xét theo cách tổ chức liệu: Tệp văn Là tệp mà DL ghi dạng kí tự theo mã ASCII Ví dụ: Các liệu dạng: Sách, học, giáo án,… thường lưu trữ dạng tệp văn Tệp có cấu trúc Là loại tệp mà thành phần tổ chức theo cấu trúc định Ví dụ: Các liệu dạng: hình ảnh, âm thanh,… thường lưu trữ dạng tệp có cấu trúc - Xét theo cách truy cập: Tệp truy cập Tệp truy cập trực tiếp Dưới ta xét khai báo làm việc với tệp văn Bài 15: Thao tác với tệp Khai báo tệp văn Var : TEXT; Program vd1; Uses crt; Var tep1,tep2: TEXT; Ví dụ: tep1,tep2 : Text; Thao tác với tệp a Gán tên tệp ASSIGN(,); Tên tệp: Là biến xâu xâu Ví dụ: ASSIGN(tep1, ‘DULIEU.DAT’); Biến tep1 gắn với tệp có tên DULIEU.DAT ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); Biến tep2 gắn với tệp có tên BAITAP.INP thư mục TP ổ đĩa D b Mở tệp Thủ tục mở tệp để ghi kết quả: REWRITE (); Nếu ổ D:\TP chưa có tệp BAITAP.INP, tệp tạo rỗng Nếu có, nội dung cũ bị xoá để chuẩn bị ghi liệu Program vd1; Uses crt; Var tep1,tep2: TEXT; BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); REWRITE (tep2); c Ghi liệu tệp Thủ tục ghi liệu tệp WRITE(, ); WRITELN (, );  Danh sách kết gồm hay nhiều phần tử Phần tử biến, xâu biểu thức Program vd1; Uses crt; Var tep2: TEXT; a,b: integer; BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); REWRITE (tep2); a:=3; b:=5; WRITE (tep2,a,’ ‘,b); Close(tep2); Readln; END Giá trị hai biến a=3, b=5 ghi tệp BAITAP.INP d Đọc liệu từ tệp Thủ tục mở tệp để đọc liệu RESET (); Thủ tục đọc liệu từ tệp: READ(, ); READLN (, );  Danh sách biến nhiều biến đơn Program vd2; Uses crt; Var tep2: TEXT; x1,y1: integer; BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); RESET (tep2); READLN (tep2,x1,y1); WRITE (‘Hai so la’ ,x1,y1); Close(tep2); Readln; END 10 e Thủ tục đóng tệp CLOSE(< tên biến tệp>) Ghi liệu tệp Program vd1; Uses crt; Var tep2: TEXT; a,b: integer; BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); Đọc liệu từ tệp Program vd2; Uses crt; Var tep2: TEXT; x1,y1: integer; BEGIN Clrscr; ASSIGN(tep2, ‘D:\TP\BAITAP.INP’); REWRITE (tep2); RESET (tep2); a:=3; b:=5; READLN(tep2, x1,y1); WRITE (tep2,a,b); WRITE (‘Hai so la’ ,x1,y1); Close(tep2); Readln; END Close(tep2); Readln; END 11 Sơ đồ mô tả thao tác với tệp Gán tên tệp Mở tệp để ghi Mở tệp để đọc Đọc liệu từ tệp Ghi liệu tệp Đóng tệp f Một số hàm chuẩn thường dùng xử lí tệp văn EOF(): Cho giá trị (true) trỏ tới cuối tệp EOLN(): Cho giá trị (true) trỏ tới cuối dòng 12 Hãy nhớ!  Khai báo tệp văn bản: Var < Tên biến tệp>: Text;  Gán tên tệp: ASSIGN();  Mở tệp: - Để đọc: RESET(); - Để ghi: REWRITE(< Tên biến tệp>);  Đọc/ghi tệp Đọc: READ(, biến nhận); Ghi: WRITE(< Tên biến tệp>,biến đưa ra);  Đóng tệp CLOSE(< tên biến tệp>); 13 14 ... tả thao tác với tệp Gán tên tệp Mở tệp để ghi Mở tệp để đọc Đọc liệu từ tệp Ghi liệu tệp Đóng tệp f Một số hàm chuẩn thường dùng xử lí tệp văn EOF( ): Cho giá trị (true) trỏ tới cuối tệp. ..Chương V: TỆP VÀ THAO TÁC VỚI TỆP Ngày soạn: 12/03/2009 Tiết: 36 Bài 14-15 Giáo án điện tử tin học lớp 11 Bài 14: Kiểu liệu tệp Vai trị kiểu tệp Em chobài tốn kiểu Với số biết DL có khối... TEXT; Ví dụ: tep1,tep2 : Text; Thao tác với tệp a Gán tên tệp ASSIGN( , ); Tên tệp: Là biến xâu xâu Ví dụ: ASSIGN(tep1, ‘DULIEU.DAT’); Biến tep1 gắn với tệp có tên DULIEU.DAT ASSIGN(tep2,