Kiểu file

I/ Định nghĩa FileII/ Khai báo file III/ Các thao tác với file 1/ Tạo file 2/ Ghi dữ liệu vào file 3/ Đọc dữ liệu file ra màn hình 4/ Ví dụ tổng hợp IV/ Củng cố kiến thức tiết học... I/

I/ Định nghĩa File

II/ Khai báo file

III/ Các thao tác với file

1/ Tạo file 2/ Ghi dữ liệu vào file 3/ Đọc dữ liệu file ra màn hình 4/ Ví dụ tổng hợp

IV/ Củng cố kiến thức tiết học

I/ ĐỊNH NGHĨA

- File là loại biến đặc biệt dùng để thiết lập liên lạc với bất kì thiết bị ngoại vi nào.

- Phân loại file:

+ File định kiểu + File văn bản + File không định kiểu

I/ ĐỊNH NGHĨA

- Về mặt cấu trúc: File như một dãy các ô được

đánh số 0, 1 , 2, … Mỗi ô chứa một dữ liệu thành phần của file

Tên biến : File Of kiểu dữ liệu; Tên kiểu file = file of kiểu dữ liệu;

Tên biến : Tên kiểu file;

Ví dụ:

Var

F : File of integer; Type

SoDiem = File of real;

Var

Diem : SoDiem;

Tên biến : Text; Tên kiểu file = Text;

Tên biến : Tên kiểu;

+ Để tạo một file mới và đặt tên cho file, Tubo Pascal dùng

cặp thủ tục sau:

Assign (Biến file, Tên file);

ReWrite (biến file);

Ví dụ: Để tạo một file có tên là số nguyên trong ổ đĩa D ta

viết chương trình như sau:

Program TaoFile;

Var F: File of integer;

Begin Assign(F,’ D:\Songuyen.dat’);

Để ghi dữ liệu vào file ta dùng thủ tục Write hoặc Writeln.

Write (biến file, Các giá trị cần đặt vào);

Trong đó các giá trị cần đặt vào có thể là:

Để ghi dữ liệu vào file ta dùng thủ tục Write hoặc Writeln.

Ví dụ: Viết chương trình tạo một file chứa các số

Để mở một file có sẳn trong đĩa, Tubo Pascal dùng cặp thủ tục:

Assign (biến file, tên biến);

Reset (biến file);

Khi chạy chương trình thì con trỏ luôn ở vị trí đầu file, nếu file không rỗng.

+ Việc đọc các phần tử từ file ra sau khi mở file

được thực hiện bởi thủ tục READ , Write.

READ (Tên file, cácbiến file);

WRITE ( Tên File, danh sách kết quả);

Lưu ý: Để đọc kết quả (sau khi xử lí dữ liệu) ra màn hình ta phải

kiểm tra xem con trỏ đã ở cuối file chưa bằng câu lệnh: While Not EOF(tên file) Do

Ví dụ: Viết chương trình đọc các số nguyên từ 1 đến

100 trong file ‘ Songuyen ‘ ra màn hình.

Ghi file Đọc file

Bài tập vận dụng:

Viết chương trình tạo một file có tên là: ‘ PHIẾU ĐIỂM’

trong ổ đĩa C với điểm các môn học: Toán, văn Xuất

kết quả xếp loại ra màn hình của từng học sinh của

lớp với kết quả xếp loại như sau:

- Nếu điểm toán + điểm văn >= 16 thì xếp loại: ‘Giỏi’;

- Nếu điểm toán + điểm văn >= 13 nhỏ hơn 16 thì xếp

loại: ‘Khá’;

- Nếu điểm toán + điểm văn >= 10 nhỏ hơn 13 thì xếp

loại: ‘Trung bình’; Còn lại thí xếp loại ‘ Yếu’

pascal

If dtoan + dvan >= 16 then Xeploai:='Xep loai: Gioi ';

If ((Dtoan + dvan >=13) and (Dtoan + dvan <16))

then xeploai:='Xep loai: Kha';

If ((Dtoan + Dvan >=10) and (Dtoan + Dvan <13))

then xeploai:='Xep loai: Trung binh';

If Dtoan + dvan < 10 then xeploai:='Xep loai: Yeu';

pascal