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)