XÉT CHƯƠNG TRÌNH SAU

Câu 7: Xét chương trình sau :

Program vidu;

Var f1,f2: text;

n: longint;

Begin

assign(f1,'tep_a.txt'); reset(f1);

assign(f2,'tep_ab.txt'); reset(f2);

while not eof(f1) do

begin

readln(f1,n);

if n>0 then writeln(f2,n);

end;

close(f1);

assign(f1,'tep_b.txt'); reset(f1);

close(f2);

End.

Hãy cho biết điều khẳng định nào sau đây là đúng

A. Chương trình trọn lọc các dòng chứa số nguyên dương từ tệp tep_b.txt sang tệp mới.

B. Chương trình trọn tạo tệp văn bản mới chứa hai lần các số nguyên dương từ tệp tep_a.txt.

C. Chương trình trọn lọc các dòng chứa số nguyên dương từ tệp tep_a.txt sang tệp mới.

D. Chương trình trọn lọc các dòng chứa số nguyên dương từ hai tệp tep_a.txt và tep_b.txt sang tệp

mới, giữ nguyên thứ tự xuất hiện trong các tệp dữ liệu vào.