Cho đoạn chương trinh sau:
Program hoan_doi;
Var a,b: Integer;
Begin
Write('Nhap vao a= '); Readln(a);
Write('Nhap vao b= '); Readln(b);
a:= a + b ;
a:= a – b ;
b:= b + a ;
Writeln( 'a = ',a, ' b = ',b);
Readln;
End.
Đây là chương trình hoán đội giá tri a và b cho nhau. chương trình trên đúng chưa? sai chỗ nào? hãy viết lại ct trên cho đúng?
