3. Viết chương trình nhập thông tin của một học sinh gồm họ tên, quê quán, lớp và lưu vào tệp hocsinh.txt.
4. Viết chương trình hiển thị thông tin đã nhập ở bài 3.
3. Viết chương trình nhập thông tin của một học sinh gồm họ tên, quê quán, lớp và lưu vào tệp hocsinh.txt.
4. Viết chương trình hiển thị thông tin đã nhập ở bài 3.
Const Fo=’HOCSINH.TXT’;
Var g: text;
hoten,quequan,lop: String;
Begin
Assign(g,Fo); Rewrite(g);
Write(‘Nhap ho va ten: ‘); Readln(hoten);
Write(‘Nhap que quan: ‘); Readln(quequan);
Write(‘Nhap lop: ‘); Readln(lop);
Writeln(g,’Ho va ten: ‘,hoten);
Writeln(g,’Que quan: ‘,quequan);
Write(g,’Lop: ‘,lop);
Close(g);
End.