Гиперболический косинус

[Ewynn]

Сказали написать программу, которая бы высчитывала ch, путём разложение в ряд Тейлора, с точностью до шестого знака после запятой, после чего сравнить полученный ответ с нормальным расчётом ch. Вроде всё работает, значение верное, но преподавателю моему не нравится этот момент, и блин, он даже не хочет сказать в чем проблема. Быть может вы, господа, поможете? И да, тема - итерационные циклы, поэтому пришлось извращаться.

while i<=6 do
begin
  fac(2*i,f);    - процедура для расчета факториала
  ch:=ch+(exp(ln(x)*(2*i)))/f;    - та самая строчка.
  i:=i+1;
end;
writeln(ch:2:6);
ch:=(exp(x)+exp(-x))/2;
writeln(ch:2:6);

Чертову неделю не могу понять, что от меня нужно, и почему оно не правильно. При надобности могу выложить всю программу целиком. Вроде бы можно как-то облегчить задачу, и сделать всё это более оптимизированно, но я ей богу не пойму как.