permutation de trois valeurs sans utilisation d'une variable auxiliaire

ALGORITHME
0- Début Permut
1- Lire(A)
2- Lire(B)
3- Lire(C)
4- A <-- A + B + C
5- B <-- A - (B+C)
6- C <-- A - (B+C)
7- A <-- A - (B+C)
8- Ecrire (A, B, C)
9- Fin Permut

PASCAL
Program Permut;
uses Wincrt;
Var A, B, C: Integer;
Begin
Write('La première valeur :');
Readln(A);
Write('La deuxième valeur :');
Readln(B);
Write('La troisième valeur :');
Readln(C);
A := A + B + C;
B := A - (B + C);
C := A - (B + C);
A := A - (B + C);
Write('La première valeur sera :',A);
Write('La deuxième valeur sera :',B);
Write('La troisième valeur sera :',C);
End.

il s'agit en faite de décalage d'une seule position des trois chiffres, exemple, si on saisi 5 puis 6 puis 7 le programme affiche 7 puis 5 puis 6