Lý Thuyết Lớp 12
Lý thuyết lớp 11
Lý thuyết lớp 10
Lý thuyết lớp 9
Lý thuyết lớp 8
Lý thuyết lớp 7
Lý thuyết lớp 6
Lý thuyết lớp 5
Lý thuyết lớp 4
Lý thuyết lớp 3
Lý thuyết lớp 2
Lý thuyết lớp 1
Thi vào lớp 10
Đại học
Thư viện câu hỏi
Thi Online
Hỏi bàiCho 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 một dòng, các số này cách nhau đúng một dấu cách)?
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 write(f,a[i],' ');
close(f);
D.
assign(f,'A.TXT');
rewrite(f);
for i:=1 to 5 do write(a[i],' ');
close(f);
Lời giải của giáo viên
ToanVN.com
Câu lệnh dùng thủ tục để ghi là:
Write(< biến tệp >,< danh sách các biến >); Writeln(< biến tệp >,< danh sách các biến >);
A sai. Vì thiếu dấu nháy đơn trong tên tệp khi gắn tệp assign (f,'A.TXT');
B sai. Vì:
+ thiếu dấu nháy đơn trong tên tệp khi gắn tệp assign (f,'A.TXT');
+ thiếu f (< biến tệp >) trong câu lệnh ghi do đề yêu cầu ghi 5 số đó ra tệp văn bản
D sai. Vì thiếu f (< biến tệp >) trong câu lệnh ghi do đề 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?
