Viết chương trình ĐỌC 1 số nguyên từ tệp DL.txt trong ổ D:\.Sau đó GHI số đó vào tệp KQ.txt trong ổ E:\
2 câu trả lời
program bai_giai;
var f,g:text;
a:longint;
begin
Assign(f,'D:\DL.txt'); reset(f);
Assign(g,'E:\KQ.txt'); rewrite(g);
readln(a);
write(g,a);
close(f); close(g);
end.
