Đoạn chương trình sau thực hiện nhiệm vụ gì

Var f:text; i: integer; Begin Assign(f, 'C:\QUANGLA.txt'); ReSet(f); While not eof(f) do Begin For i:=1 to 10 do If i mod 2 = 0 then write(i); End; Close(f); Readln; End. Đọc từ tệp QUANGLA.TXT các số từ 1 đến 10 và in ra màn hình các số lẻ. Đọc từ tệp QUANGLA.TXT các số từ 1 đến 10 và ...