Даны переменные A, B, C. Изменить их значения, переместив содержимое A в B, B — в C, C —...

Question

Даны переменные A, B, C. Изменить их значения, переместив содержимое A в B, B — в C, C — в A, и вывести новые значения переменных A, B,C.

Answer 1

Var
a,b,c,d:integer;
begin
read(a,b,c); d:=0;
d:=c;
c:=b, b:=a, a:=d;
writeln(a,b,c);
end.