Begin24. Даны переменные A, B, C. Изменить их значения, переместив содержимое A в C, C – в B, B – в A, и вывести новые значения переменных A, B, C.
var a, b, c, buf: real;
begin
  write('Введите значения А, B и C ->');
  readln(a, b, c);
  buf:=a;
  a:=b;
  b:=c;
  c:=buf;
  writeln('A = ', a:6:2);
  writeln('B = ', b:6:2);
  writeln('C = ', c:6:2);
end.