Khai báo biến tệp: var <tên biến tệp>: text;
Mở tệp: assign(<biến tệp>, '<tên tệp>');
Đọc tệp: reset(<biến tệp>); read/readln(<biến tệp>, <tên biến>);
Ghi tệp: rewrite(<biến tệp>); write/writeln(<biến tệp>, <nội dung>);
Ví dụ:
var f:text;
a,b:longint;
begin
assign(f, 'test.inp'); reset(f);
read(f,a,b);
close(f);
assign(f, 'test.out'); rewrite(f);
write(f, a + b);
close(f);
end.
