Процедуры и функции

[GTO7778]

Описать функцию f(x)- дробная часть (х). составить программу поиска числа с наибольшей дробной частью из данного набора чисел

[rubius2008]

функция

function f(x:real):real;
begin
   f:=frac(x);
end;

поиск числа сами попробуйте сделать