blob: b6e22ae22e79363ab0b1c633eeb465a118582688 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//ques10
clc
disp('finding the fourier series of given function');
syms x
ao=2/2*(integ(x,x,0,2));
s=ao/2;
n=input('enter the no of terms upto each of sin or cos terms in the expansion : ');
for i=1:n
ai=2/2*(integ(x*cos(i*%pi*x/2),x,0,2));
//bi=1/%pi*(integ(-1*%pi*x^0*sin(i*x),x,-1*%pi,0)+integ(x*sin(i*x),x,0,%pi));
s=s+float(ai)*cos(i*%pi*x/2);
end
disp(float(s));
|
