[lmikle]

Сообщение от Макс555

спасибо,а вот этот момент - возвращает результат через собственное имя
это как?

Это должно быть тогда вот так:

Код:

function ch(x: Double): Double;
begin
  ch := (Exp(x)+Exp(-x))/2;
end;

И, кстати, лучше использовать тип Double или Extended.