II – Tệp văn bản: Bài 1: Cho tệp văn HS.TXT chứa danh sách tên học sinh, học sinh dòng Hãy viết chương trình sửa lại nội dung tệp cách thêm vào đầu tên học sinh số thứ tự Vd: Nguyen Van A Le Thi B Sau đổi sau: Nguyen Van A Le Thi B @Lập trình: Program sua_van_ban; Var f, f1, f2 : text; a, k : char; Begin assign(f1, ‘HS.TXT’ ); reset(f); assign(f2, ‘HS1.TXT’ ); rewrite(f); a:=’0’; While not eof(f1) Begin a:=Chr(ord(a)+1); Write(f2,a,’ ‘); While not eoln(f1) Begin Read(f1,k); Write(f2,k); End; Readln(f1); Writeln(f2); End; Close(f1);close(f2); Assign(f1, ,‘HS.TXT’ ); rewrite(f); assign(f2, ‘HS1.TXT’ ); reset(f); While not eof(f2) Begin While not eoln(f2) Begin Read(f2,k); Write(f1,k); End; Readln(f1); Writeln(f2); End; Close(f1);close(f2); End