summaryrefslogtreecommitdiff
path: root/149/CH4/EX4.16/ques16.sce
blob: 21ec4361833c8b94c8ce5bc57a9d1797e930b617 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//ques16
disp('Maclaurins series');
disp('f(x)=f(0)+xf1(0)+x^2/2!*f2(0)+x^3/3!*f3(0)+......');
syms x a
//function y=f(a)
  y=tan(a);
//endfunction
n=input('enter the number of expression in series : ');
a=1;
t=eval(y);
a=0;
for i=2:n
  y1=diff(y,'a',i-1);
  t=t+x^(i-1)*eval(y1)/factorial(i-1);
end
disp(t)