Помогите вычислить функцию
 

Вычислить y=ln(w^2+w+1)*cos(4*x)/exp(-2*w+2).
{exp(ln(x)/3)+ln(x) при 0.1<x<2
где W {sqr(sin(x)+4*x при x<=0.1
{2.6*x^2-3.7 в остальных случаях -3<=x<=3; h=0,4

В delphi надо?

Нет.В паскале.