... Writeln(# 32, i:4,# 32, L[i].Hoten:30,# 32, L[i].dtb:4 :2, # 32, hang:3,# 32) ; End; End; {Liet_ke} Begin {CHUONG TRINH CHINH} Clrscr; Nhap; Sap_xep; Liet_ke; Readln; End 9 .2 Kiểu tập tin (File type) 9 .2. 1 Khái ... x,y chơng trình ta cần gọi chơng trình MAX(x,y) Một ứng dụng khác chơng trình phát triển chơng trình lớn Khi chia nhỏ công việc thành nhiều chơng trình riêng biệt (Module) Các lập trình viên ... tham trị chơng trình Chơng trình Program Tham_tri; 61 Var a,b,c: Integer; Procedure InTri(x,y,z : Integer); Begin x:=x *2; y:=y *2; z:=z *2; Writeln(Trong thu tuc ta co so:,x,# 32, y,# 32, z); End; Begin...