... dụng từ khóa Var trong tham số của thủ tục vì cả 2 biến đều chứa dữ liệu. Procedure Hoan_Doi(var x,y :integer); Program CT3 Var a,b :integer; Procedure Hoan_Doi(var x,y :integer); Var TG: integer; ... Kết quả 5 10 10 5 Program CT4 Var a,b :integer; Procedure Hoan_doi(x: integer, Var y: integer); Var TG: integer; Begin TG : = x ; x : = y ; y : = TG ; End; {chuong trinh chinh} Begin A:=5; B:=10; ... y : = TG ; End; {chuong trinh chinh} Begin A:=5; B:=10; Writeln( A : 6, B : 6); Hoan_Doi(A,B); Writeln(A: 6, B:6); Readln; End. Trong dòng đầu thủ tục : Procedure Hoan_doi (var x,y :integer);...