Ai giúp mình cho 1 ví dụ ở 11 cú pháp bên dưới. Tks !!! 1. var < tên biến tệp > : text; 2. assign(< biến tệp >,< tên tệp >); 3. rewrite(< biến tệp >); 4. reset(< biến tệp >); 5. read(< biến tệp >,< danh sách biến >); 6. readln(< tên biến tệp >,< danh sách biến >); 7. write(< biến tệp >,< danh sách kết quả >); 8. writeln(< biến tệp >,< danh sách kết quả >); 9. eof(<biến tệp >) 10. eoln(< biến tệp >) 11. close(< tên biến tệp >);

2 câu trả lời

1. var t: text;
2. assign(k,f);
3. rewrite (f);
4. reset(f);
5. read(k);
6. readln(n);
7. write (f,g);
8. writeln (f,g);
9. eof(k)
10. eoln(k);
11. close(s);

1. var f:text;

2. assign(f,'DAYCON.INP');

3. rewrite(f);

4. reset(f);   

5. read(f,n);    (đọc từ tệp f biến n)

6. readln(f,n);  (đọc từ tệp f biến n rồi xuống hàng)

7. write(f,n);  (viết vào tệp f biến n)

8. writeln(f,n);   (viết vào tệp f biến n rồi xuống hàng)

9. eof(f);  (cho đến khi hết tệp f)

10. eoln(f);   (cho đến khi hết hàng f)

11. close(f);   (đóng tệp f)

Câu hỏi trong lớp Xem thêm