.Составить программу, которая вычисляет дробную часть вещественного числа x, введенного с клавиатуры.

Вопрос от посетителя

  .Составить программу, которая вычисляет дробную часть вещественного числа x, введенного с клавиатуры.

Отвечает Илюха:

var x,c:real;

begin

read(x);

c:=frac(c);

writeln(c:1:6);

readkey;

end.