Paskal даны значения трёх целочисленных переменных a, b, c. переместить их значения так, чтобы переменная а получила бы исходное значение b, b получила бы значения c, а переменная c - значение a.

{Файл prog1_13_3.pasЗадача:  Даны значения трёх целочисленных переменных a, b, c. Переместить их значения так, чтобы переменная а получила бы исходное значение b, b получила бы значения c, а переменная c - значение a.Автор:  Башмаков М. Д., ИТ-11Дата:  15,09,2015}  var a, b, c, k: integer;
begin  k:=0;  {Ввод}  writeln('введите переменные a, b, c');  readln (a, b, c);  {Перемещенние}   k:=a;  a:=b;  b:=c;  c:=k;  {Вывод}  writeln('а=',a,' b=',b, ' c=',c);end.