Решите по информатике на pascal через real. дано вещественное число поменять местами целую и дробную часть,но число должно составленно так чтобы в целой части было 2 цифры и в дробной 2 цифры. например: число 16.59 вывести 59.16 например: число 32.47 вывести 47.32

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ReadReal;
  Writeln(100*Frac(x)+Trunc(x)/100:0:2)
end.

Примеры
16.59
59.16

32.47
47.32