Question

Дано положительное действительное число x.Выведите его дробную часть.(Паскаль)

Answer 1

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  Frac(ReadReal).Println
end.

Примеры:
15.52
0.52

0.00035
0.00035

24
0

1.523e-9
1.523E-09