Дано вещественное число А,содержащее два знака до запятой и 2 после. Получить новое число,поменяв в числе А целую и дробную части.

Программа на паскале
var a,b:real;
begin
write(a = );
readln(a);
b:=frac(a)*100+trunc(a)/100;
writeln(b = ,b);
end.

Пример:
a = 12.34
b = 34.12