суть такова: в поле тЕдит вводится какая-нибудь формула, и надо её скопировать всю, чтобы передать в процедуру для подсчета
Код:
function PodIntFunc( k : integer; x : extended ) : extended;
begin
result := FuncFi(x, Mu[k+1]) * exp( - 4 * ( x - 1 ) * ( x - 1 ) );
end;
lmikle: пользукмся тегами! при повторном нарушении буду карать!!!
вот вместо
exp( - 4 * ( x - 1 ) * ( x - 1 ) чтобы можно было любую функцию вводить
как реализовать?