Cho mảng A gồm n phần tử kiểu integer. Đoạn lệnh nào ghi ra tệp văn bản tên là 'BTXT theo dạng: dòng đầu tiên ghi số n, dòng thứ hai ghi n số là các phần tử của mảng A (các số này cách nhau đúng một dấu cách)?
A.
assign(f,B.TXT);
rewrite(f);
writeln(f,n);
for i:=1 to n do write(f,a[i],' ');
close(f);
B.
assign(f,'B.TXT');
rewrite(f);
writeln(f,n);
for i:=1 to n do write(f,a[i],' ');
close(f);
C.
assign(f,B.TXT);
reset(f);
writeln(f,n);
for i:=1 to n do write(f,a[i],' ');
close(f);
D.
assign(f,'B.TXT');
reset(f);
writeln(f,n);
for i:=1 to n do write(f,a[i],' ');
close(f);
Lời giải của giáo viên
ToanVN.com
A sai vì gắn tên tệp thiếu dấu nháy đơn
C sai gắn tên tệp thiếu dấu nháy đơn và lệnh thủ tục mở để ghi
D sai lệnh thủ tục mở để ghi
Đáp án B
CÂU HỎI CÙNG CHỦ ĐỀ
Xét chương trình sau:
var i : longint;
f : text;
BEGIN
assign (f, 'A.txt');
rewrite(f);
i:=123456;
writeln(f, i);
write (f, -789);
close(f);
END
Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?
Xét chương trình sau:
Var f: text;
begin
Assign (f, 'ABC.txt');
Rewrite(f);
write (f, 105+304-234);
close(f);
end.
Sau khi thực hiện chương trình, tệp ABC.txt có nội dung như thế nào?
Xét chương trình sau:
var a : real;
f :text;
BEGIN
assign (f, 'A txt'); rewrite(f);
a:=12.345;
writeln(f, a)
close(f);
END
Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?
Xét chương trình sau:
var a : Real ;
f :text;
BEGIN
assign (f, 'A.txt'); rewrite();
a:=12.345;
writeln(f, a: 6:3);
close(f);
END
Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?
Xét chương trình sau:
var a, b : longint;
f :text;
BEGIN
assign (f, 'A.txt');
rewrite(f);
a:=123456; b:=456;
write (f, a-b);
close(f);
END.
Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?
Xét chương trình sau:
var a,b longint;
f :text:
BEGIN
assign (f, 'A txt');
rewrite (f);
a:=123456;
b: =456;
writeln(f, a,b);
writeln(f, b, a);
close(f);
END
Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?
Để đọc dữ liệu từ tệp văn bản, ta có thể sử dụng thủ tục nào?
Khi tiến hành mở tệp để ghi và tìm thấy tệp thì sẽ ra sao?
Để ghi dữ liệu vào tệp văn bản, ta có thể sử dụng thủ tục nào?
Để gán tệp KETQUA.TXT cho biến tệp f ta sử dụng câu lệnh nào?
Trong Pascal, để khai báo biên tập văn bản là sử dụng cú pháp nào?