Cho mảng A gồm 5 phần tử kiểu integer. Đoạn lệnh nào ghi 5 số đó ra tệp văn bản tên là 'A.TXT' (ghi trên 5 dòng, mỗi dòng một số)?
A.
assign(f,'A.TXT');
rewrite(f);
for i:=1 to 5 do write(f,a[i],' ');
close(f);
B.
assign(f,'A.TXT');
rewrite(f);
for i:=1 to 5 do write(a[i],' ');
close(f);
C.
assign(f,'A.TXT');
rewrite(f);
for i:=1 to 5 do writeln(f,a[i],' ');
close(f);
D.
assign(f,'A.TXT');
rewrite(f);
for i:=1 to 5 do writeln(a[i],' ');
close(f);
Lời giải của giáo viên
ToanVN.com
A sai. Phải sử dụng lệnh Writeln(<biến tệp>,<danh sách kết quả>); để xuống dòng lệnh Write không thực hiện xuống dòng
B sai vì dùng sai lệnh
D sai vì lệnh writeln thiếu biến tệp f do dề bài yêu cầu ghi 5 số đó ra tệp văn bản
Đáp án C
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 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 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();
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?
Khi tiến hành mở tệp để ghi mà không tìm thấy tệp thì như thế nào?