Cách đọc Ghi File Trong Pascal

Đọc các tập tin văn bản pascal

Chào các bạn hôm nay mình sẽ hướng dẫn các bạn cách đọc, ghi file

  1. Đọc các tập tin văn bản (đọc file).
  2. Viết các tập tin văn bản (ghi file).

Để thực hiện các thao tác với file các bạn phải khai báo biến text, như sau:

var f:text;
1varf:text;

F là một biến của tập tin văn bản. Điều đầu tiên chúng ta phải làm là kết hợp nó với một tên file, ví dụ:

assign(F,'data.inp');
1assign(F,'data.inp');

Trước khi bạn có thể đọc nó, bạn phải mở nó:

reset(f);
1reset(f);

Bạn có thể đọc các tập tin bằng dòng, giống như nhập vào từ bàn phím. Giả sử s là biến chuỗi:

readln(F, s);
1readln(F,s);

Lưu ý rằng nếu file “data.inp” có nội dung như sau

1234 abcd
121234abcd

Nếu bạn đọc xâu thì bạn có thể dùng readln(f,s) để đọc cả dòng vào biến s. hoặc dùng read(f,s) thì máy chỉ nhập cho bạn 1 kí tự.

Ngược lại nếu bạn nhập theo số nguyên thì nếu dùng read(f,N) máy sẽ nhập cả số nguyên, tuy nhiên read ko tự xuống dòng. Tuy nhiên nếu bài toán chỉ có số nguyên thì nhập read vẫn được, do read khi hết dòng nó sẽ xuống tiếp dòng dưới để đọc số tiếp. còn đối với xâu, khi hết dòng, mà dùng lệnh read(f,s); thì nó sẽ đọc vào kí tự enter(xuống dòng); để giải quyết bạn nên nhập bằng readln(f,s);

Có một số bài toán cho đọc dữ liệu đến khi kết thúc file bạn có thể dùng hàm

while not eof(f) do begin ***************** end;
1whilenoteof(f)dobegin *****************end;

để kiểm tra hết dòng bạn dùng hàm eoln(f)

sau khi đọc xong dữ liệu bạn phải đóng file bằng câu lệnh

close(F);
1close(F);

Ghi các tập tin văn bản pascal

– Thao tác ghi dữ liệu vào tệp rất đơn giản giống như thao tác ghi trên màn hình. và để ghi được file bạn phải thực hiện, mở file, làm mới file, ghi file và đóng file.

assign(f,'data.out'); rewrite(f); // vi du minh sẽ viết ra file "abc" writeln(f,'abc'); close(f);
1234assign(f,'data.out');rewrite(f);// vi du minh sẽ viết ra file "abc"writeln(f,'abc');close(f);

Từ khóa » Sử Dụng File Trong Pascal