$\text{* Xác định bài toán :}$
$\text{- Input : giá trị a và giá trị b}$
$\text{- Output : giá trị a và b sau khi hoán đổi}$
$\text{* Mô tả thuật toán :}$
$\text{- Bước 1 : nhập a, b}$
$\text{- Bước 2 : a ← a + b;}$
$\text{- Bước 3 : b ← a - b;}$
$\text{- Bước 4 : a ← a - b;}$
$\text{- Bước 5 : in ra màn hình giá trị a và b và kết thúc}$

$\text{* Viết chương trình :}$

$\text{program hoandoi;}$

$\text{uses crt;}$

$\text{var a, b : integer;}$

$\text{begin}$

$\text{clrscr;}$

$\text{write('nhap so a :');readln(a);}$

$\text{write('nhap so b :');readln(b);}$

$\text{a := a + b;}$

$\text{b := a - b;}$

$\text{a := a - b;}$

$\text{writeln('gia tri cua ', a ,' sau khi hoan doi la :', a);}$

$\text{writeln('gia tri cua ', b ,' sau khi hoan doi la :', b);}$

$\text{readln}$

$\text{end.}$