Câu 2 : Var a, b, s : integer;

* Xác định bài toán :

- Input : ba số nguyên x, y, z

- Output : giá trị 3 biến sau khi hoán vị vòng quanh

* Mô tả thuật toán :

- Bước 1 : nhập x, y, z

- Bước 2 : x ← x + y + z;

- Bước 3 : z ← x - y - z;

- Bước 4 : y ← x - y - z

- Bước 5 : x ← x - y - z

- Bước 6 : giá trị x, y và z sau khi hoán đổi 

- Bước 7 : kết thúc

* Viết chương trình :

uses crt;
var x, y, z : integer;
begin
clrscr;
write('x = ');readln(x);
write('y = ');readln(y);
write('z = ');readln(z);
x := x + y + z;
z := x - y - z;
y := x - y - z;
x := x - y - z;
writeln('x = ', x);
writeln('y = ', y);
writeln('z = ', z);
readln
end.