Как раз то, это нужно для режима в положении радиоптисы на Y(x), но необходим для этой процедуры внятный первый параметр (f:fun), объявление его есть
Код:
Type
fun = function(x : extended):extended; // Объявление типа функция
но, что должно происходить внутри этой конструкции, и главное, на выходе, не указано, не хватает тела функции