Под цифрой "3" решите пож!
разложить надо, как в бейскике!
c:=(a*a + abs(a) + sqrt(a)) / (3*cos(a)*cos(a) + 1) + 1;
C:=(a*a + abs(a) + sqrt(a)) / (3*cos(a)*cos(a) + 1) + 1;