Viết các câu lệnh cần thiết để mở tệp bt1.txt và ghi vào đó nội dung 'tây ninh' ai đó giúp với
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
var s:string;
f1:text;
a:byte;
begin
assign(f1,'c:\ghixau1.txt'); rewrite(f1);
readln(s);
writeln(f1,s);
close(f1);
End.
Assign(f2,’ketqua.txt’);
Rewrite(f2);
Write(f2,T,S);
Close(f2);
begin
assign(fi,'bt1.txt');rewrite(fi);
write(fi,'tay ninh');
end.
const fi='bt1.txt';
var f1:text;
begin
assign(f1,fi); rewrite(f1);
writeln(f1,'Tay Ninh');
close(f1);
end.