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?
A.A.
123456-456;
B.B.
123000;
C.C.
123456456;
D.D.
Tất cả A, B, C đều sai.
Đáp án và lời giải
Đáp án:B
Lời giải:
Lệnh
write (f, a-b);
có nghĩa là ghi ra tệp kết quả của a-b do không có dấu nháy đơn
Đáp án B