107 files changed, 1118 insertions, 0 deletions
diff --git a/3838/CH2/EX2.1.C/EX2_1_C.png b/3838/CH2/EX2.1.C/EX2_1_C.png
new file mode 100644
index 000000000..a748d578c
--- /dev/null
+++ b/3838/CH2/EX2.1.C/EX2_1_C.png
diff --git a/3838/CH2/EX2.1.C/Ex2_1_c.sce b/3838/CH2/EX2.1.C/Ex2_1_c.sce
new file mode 100644
index 000000000..e8ab7c5e9
--- /dev/null
+++ b/3838/CH2/EX2.1.C/Ex2_1_c.sce
@@ -0,0 +1,7 @@
+//example 2.1.c
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+y =exp(-(2*%i*%pi*t)/7);
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=7' ) ;
diff --git a/3838/CH2/EX2.1.D/EX2_1_D.png b/3838/CH2/EX2.1.D/EX2_1_D.png
new file mode 100644
index 000000000..0b9ca2611
--- /dev/null
+++ b/3838/CH2/EX2.1.D/EX2_1_D.png
diff --git a/3838/CH2/EX2.1.D/Ex2_1_d.sce b/3838/CH2/EX2.1.D/Ex2_1_d.sce
new file mode 100644
index 000000000..2be67789d
--- /dev/null
+++ b/3838/CH2/EX2.1.D/Ex2_1_d.sce
@@ -0,0 +1,7 @@
+//example 2.1.d
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+y =3*(cos((5*t)+(%pi/6)));
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=2%pi/5' ) ;
diff --git a/3838/CH2/EX2.1.E/EX2_1_E.png b/3838/CH2/EX2.1.E/EX2_1_E.png
new file mode 100644
index 000000000..72147e49c
--- /dev/null
+++ b/3838/CH2/EX2.1.E/EX2_1_E.png
diff --git a/3838/CH2/EX2.1.E/Ex2_1_e.sce b/3838/CH2/EX2.1.E/Ex2_1_e.sce
new file mode 100644
index 000000000..03c82badc
--- /dev/null
+++ b/3838/CH2/EX2.1.E/Ex2_1_e.sce
@@ -0,0 +1,7 @@
+//example 2.1.e
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+y =(1+cos(2*(2*t)-(%pi/3)))/(2);
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=%pi/2' ) ;
diff --git a/3838/CH2/EX2.1.a/Ex2_1_a.png b/3838/CH2/EX2.1.a/Ex2_1_a.png
new file mode 100644
index 000000000..2c3cd4eaa
--- /dev/null
+++ b/3838/CH2/EX2.1.a/Ex2_1_a.png
diff --git a/3838/CH2/EX2.1.a/Ex2_1_a.sce b/3838/CH2/EX2.1.a/Ex2_1_a.sce
new file mode 100644
index 000000000..2be3dd31a
--- /dev/null
+++ b/3838/CH2/EX2.1.a/Ex2_1_a.sce
@@ -0,0 +1,9 @@
+//example 2.1.a
+//check the signal is periodic or not
+clc ;
+t = -15:0.01:15;
+y =2*(cos( t/4 ));
+plot (t ,y ) ;
+xtitle('plot of function 2*cos(t/4)')
+xlabel('time-->')
+disp ( 'Plot  shows that given signal is periodic with period T=8%pi' ) ;
diff --git a/3838/CH2/EX2.1.b/Ex2_1_b.png b/3838/CH2/EX2.1.b/Ex2_1_b.png
new file mode 100644
index 000000000..7feb318af
--- /dev/null
+++ b/3838/CH2/EX2.1.b/Ex2_1_b.png
diff --git a/3838/CH2/EX2.1.b/Ex2_1_b.sce b/3838/CH2/EX2.1.b/Ex2_1_b.sce
new file mode 100644
index 000000000..27f80ca78
--- /dev/null
+++ b/3838/CH2/EX2.1.b/Ex2_1_b.sce
@@ -0,0 +1,10 @@
+//example 2.1.b
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+a=1;//assumed the value of a to be equal to 1
+y =exp(a*t);
+plot(t,y);
+xtitle('plot of function exp(a*t)')
+xlabel('time--->')
+disp ( 'Plot  shows that given signal is not periodic' ) ;
diff --git a/3838/CH2/EX2.11.a/EX2_11_a.sce b/3838/CH2/EX2.11.a/EX2_11_a.sce
new file mode 100644
index 000000000..78372bd79
--- /dev/null
+++ b/3838/CH2/EX2.11.a/EX2_11_a.sce
@@ -0,0 +1,17 @@
+//Example 2.11.a
+//to check the system is time invariant or not
+clc ;
+t0 =1;
+T =10;
+for t =1: T
+x ( t ) =t;
+y ( t ) =(2)*(t)*x(t) ;
+end
+inputshift = 2*(T)*x (T - t0 );
+outputshift = y (T - t0 ) ;
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' )
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH2/EX2.11.b/EX2_11_b.sce b/3838/CH2/EX2.11.b/EX2_11_b.sce
new file mode 100644
index 000000000..e1d8854c0
--- /dev/null
+++ b/3838/CH2/EX2.11.b/EX2_11_b.sce
@@ -0,0 +1,16 @@
+//Example 2 . 2 11 b
+clc ;
+t0 =1;
+T =10;
+for t =1: T
+x ( t ) =t;
+y ( t ) =x(t)*sin(20*%pi*t) ;
+end
+inputshift = x(T-t0)*sin (20*%pi*(T) ) ;
+outputshift = y (T - t0 ) ;
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' )
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH2/EX2.12.a/EX2_12_a.sce b/3838/CH2/EX2.12.a/EX2_12_a.sce
new file mode 100644
index 000000000..f9748b976
--- /dev/null
+++ b/3838/CH2/EX2.12.a/EX2_12_a.sce
@@ -0,0 +1,16 @@
+//Example 2   2.12.a
+clc ;
+t0 =1;
+T =10;
+for t =1: T
+x ( t ) =t;
+y ( t ) =(2)*exp(x(t)) ;
+end
+inputshift = 2*exp(x (T - t0)) 
+outputshift = y (T - t0 ) 
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' );
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH2/EX2.12.b/EX2_12_b.sce b/3838/CH2/EX2.12.b/EX2_12_b.sce
new file mode 100644
index 000000000..0bbd6bbd7
--- /dev/null
+++ b/3838/CH2/EX2.12.b/EX2_12_b.sce
@@ -0,0 +1,17 @@
+//Example 2  2.12.b
+clc ;
+t0 =1;
+T =10;
+c=2;
+for t =1: T
+x ( t ) =t;
+y ( t ) =x(t)+c ;
+end
+inputshift = x (T - t0)+c 
+outputshift = y (T - t0 ) 
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' );
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH2/EX2.12.c/EX2_12_c.sce b/3838/CH2/EX2.12.c/EX2_12_c.sce
new file mode 100644
index 000000000..f0e7e9e8e
--- /dev/null
+++ b/3838/CH2/EX2.12.c/EX2_12_c.sce
@@ -0,0 +1,17 @@
+//Example 2-12-c
+clc ;
+t0 =1;
+T =10;
+c=2;
+for t =1: T
+x ( t ) =t;
+y ( t ) =3*(x(t))^(2);
+end
+inputshift = 3*(x(T - t0))^(2)
+outputshift = y (T - t0 ) 
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' );
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH2/EX2.13.a/Ex2_13_a.sce b/3838/CH2/EX2.13.a/Ex2_13_a.sce
new file mode 100644
index 000000000..7ec4454b6
--- /dev/null
+++ b/3838/CH2/EX2.13.a/Ex2_13_a.sce
@@ -0,0 +1,33 @@
+//example 2_13_a 
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for t = 1:length(x1)
+  x3(t) = a*x1(t)+b*x2(t);
+end
+for t = 1:length(x1)
+  y1(t) = t*x1(t);
+  y2(t) = t*x2(t);
+  y3(t) = t*x3(t);
+end
+for t = 1:length(y1)
+  z(t) = a*y1(t)+b*y2(t);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(t)== z(t))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH2/EX2.13.c/Ex2_13_c.sce b/3838/CH2/EX2.13.c/Ex2_13_c.sce
new file mode 100644
index 000000000..f34bc15b7
--- /dev/null
+++ b/3838/CH2/EX2.13.c/Ex2_13_c.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 2.13.C
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for t = 1:length(x1)
+  x3(t) = a*x1(t)+b*x2(t);
+end
+for t = 1:length(x1)
+  y1(t) = (x1(t)^2);
+  y2(t) = (x2(t)^2);
+  y3(t) = (x3(t)^2);
+end
+for t = 1:length(y1)
+  z(t) = a*y1(t)+b*y2(t);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(t)== z(t))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH2/EX2.13.d/Ex2_13_d.sce b/3838/CH2/EX2.13.d/Ex2_13_d.sce
new file mode 100644
index 000000000..43cfcc627
--- /dev/null
+++ b/3838/CH2/EX2.13.d/Ex2_13_d.sce
@@ -0,0 +1,35 @@
+//EXAMPLE 2.13.D
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+A=2
+B=3;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = A*x1(n)+B;
+  y2(n) = A*x2(n)+B;
+  y3(n) = A*x3(n)+B;
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH2/EX2.13.e/Ex2_13_e.sce b/3838/CH2/EX2.13.e/Ex2_13_e.sce
new file mode 100644
index 000000000..d8356dc9a
--- /dev/null
+++ b/3838/CH2/EX2.13.e/Ex2_13_e.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 2.13.e
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for t = 1:length(x1)
+  x3(t) = a*x1(t)+b*x2(t);
+end
+for t = 1:length(x1)
+  y1(t) = exp(x1(t));
+  y2(t) = exp(x2(t));
+  y3(t) = exp(x3(t));
+end
+for t = 1:length(y1)
+  z(t) = a*y1(t)+b*y2(t);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(t)== z(t))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH2/EX2.17.a/EX2_17_a.sce b/3838/CH2/EX2.17.a/EX2_17_a.sce
new file mode 100644
index 000000000..dd3b04fee
--- /dev/null
+++ b/3838/CH2/EX2.17.a/EX2_17_a.sce
@@ -0,0 +1,10 @@
+//EXAMPLE 2.17.A
+clc;
+x=[1,1,1,1]
+t=-1:0:1;
+y(t)=cos(x(t));
+disp('the max val of cos function is');
+disp(cos(0));
+disp('the min val of cos function is');
+disp(cos(%pi));
+disp('HENCE THE GIVEN SYSTEM IS BOUNDED IN -1 TO 1 HENCE THE GIVEN SYSTEM IS STABLE');
diff --git a/3838/CH2/EX2.18.a/EX2_18_A.sce b/3838/CH2/EX2.18.a/EX2_18_A.sce
new file mode 100644
index 000000000..ed1fbedbe
--- /dev/null
+++ b/3838/CH2/EX2.18.a/EX2_18_A.sce
@@ -0,0 +1,6 @@
+//Example 2.18.a
+clc;
+P=integrate('(exp(-5*t))','t',0,100)
+E=integrate('(exp(5*t))','t',-100,0)
+disp(P+E)
+disp('AS THE INTEGRATION PRODUCT IS CONSTANT HENCE THE SYSTEM IS STABLE');
diff --git a/3838/CH2/EX2.18.c/EX2_18_C.sce b/3838/CH2/EX2.18.c/EX2_18_C.sce
new file mode 100644
index 000000000..827b361f6
--- /dev/null
+++ b/3838/CH2/EX2.18.c/EX2_18_C.sce
@@ -0,0 +1,5 @@
+//Example 2.18.C
+clc;
+P=integrate('(exp(-4*t))','t',0,100)
+disp(P)
+disp('AS THE INTEGRATION PRODUCT IS CONSTANT HENCE THE SYSTEM IS STABLE');
diff --git a/3838/CH2/EX2.18.d/EX2_18_D.sce b/3838/CH2/EX2.18.d/EX2_18_D.sce
new file mode 100644
index 000000000..875333538
--- /dev/null
+++ b/3838/CH2/EX2.18.d/EX2_18_D.sce
@@ -0,0 +1,5 @@
+//Example 2.18.D
+clc;
+P=integrate('(t*exp(-3*t))','t',0,100)
+disp(P)
+disp('AS THE INTEGRATION PRODUCT IS CONSTANT HENCE THE SYSTEM IS STABLE');
diff --git a/3838/CH2/EX2.18.f/EX2_18_F.sce b/3838/CH2/EX2.18.f/EX2_18_F.sce
new file mode 100644
index 000000000..83aa2adc3
--- /dev/null
+++ b/3838/CH2/EX2.18.f/EX2_18_F.sce
@@ -0,0 +1,5 @@
+//Example 2.18.F
+clc;
+P=integrate('(exp(-t)*sin(t))','t',0,100)
+disp(P)
+disp('AS THE INTEGRATION PRODUCT IS CONSTANT HENCE THE SYSTEM IS STABLE');
diff --git a/3838/CH2/EX2.2.C/EX2_2_C.png b/3838/CH2/EX2.2.C/EX2_2_C.png
new file mode 100644
index 000000000..c31b6a497
--- /dev/null
+++ b/3838/CH2/EX2.2.C/EX2_2_C.png
diff --git a/3838/CH2/EX2.2.C/Example2_2_c.sce b/3838/CH2/EX2.2.C/Example2_2_c.sce
new file mode 100644
index 000000000..8f0a9dd57
--- /dev/null
+++ b/3838/CH2/EX2.2.C/Example2_2_c.sce
@@ -0,0 +1,7 @@
+//example 2.2.c
+//check the signal is periodic or not
+clc ;
+t =-6:0.01:6;
+y =(5*cos(4*%pi*t))+(3*sin(8*%pi*t));
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=1/2' ) ;
diff --git a/3838/CH2/EX2.2.a/EX2_2_a.png b/3838/CH2/EX2.2.a/EX2_2_a.png
new file mode 100644
index 000000000..ebf88d5d4
--- /dev/null
+++ b/3838/CH2/EX2.2.a/EX2_2_a.png
diff --git a/3838/CH2/EX2.2.a/Example2_2_a.sce b/3838/CH2/EX2.2.a/Example2_2_a.sce
new file mode 100644
index 000000000..c10394ae5
--- /dev/null
+++ b/3838/CH2/EX2.2.a/Example2_2_a.sce
@@ -0,0 +1,7 @@
+//example 2.2.a
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+y =(2*cos((2)*(%pi)*t/3))+(3*cos((2)*(%pi)*t/7));
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=21' ) ;
diff --git a/3838/CH2/EX2.2.b/EX2_2_b.png b/3838/CH2/EX2.2.b/EX2_2_b.png
new file mode 100644
index 000000000..23bbb7d64
--- /dev/null
+++ b/3838/CH2/EX2.2.b/EX2_2_b.png
diff --git a/3838/CH2/EX2.2.b/Example2_2_b.sce b/3838/CH2/EX2.2.b/Example2_2_b.sce
new file mode 100644
index 000000000..713db8ea1
--- /dev/null
+++ b/3838/CH2/EX2.2.b/Example2_2_b.sce
@@ -0,0 +1,7 @@
+//example 2.2.b
+//check the signal is periodic or not
+clc ;
+t =-15:0.01:15;
+y =(2*cos(3*t))+(3*sin(7*t))
+plot(t,y);
+disp ( 'Plot  shows that given signal is  periodic with periodicity=2%pi' ) ;
diff --git a/3838/CH2/EX2.20.B/EX2_20_B.sce b/3838/CH2/EX2.20.B/EX2_20_B.sce
new file mode 100644
index 000000000..c2442f806
--- /dev/null
+++ b/3838/CH2/EX2.20.B/EX2_20_B.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.20.B
+clc;
+x1=100;
+x=integrate('exp(-2*t)*exp(-5*t)','t',0,x1);
+disp(x);
+disp('valid for t>=0');
diff --git a/3838/CH2/EX2.20.C/EX2_20_C.sce b/3838/CH2/EX2.20.C/EX2_20_C.sce
new file mode 100644
index 000000000..04a0be4b3
--- /dev/null
+++ b/3838/CH2/EX2.20.C/EX2_20_C.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.20.C
+clc;
+x1=100;
+x=integrate('t*exp(-5*t)','t',0,x1);
+disp(x);
+disp('valid for t>=0');
diff --git a/3838/CH2/EX2.20.D/EX2_20_D.sce b/3838/CH2/EX2.20.D/EX2_20_D.sce
new file mode 100644
index 000000000..7c12dfa18
--- /dev/null
+++ b/3838/CH2/EX2.20.D/EX2_20_D.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.20.D
+clc;
+x1=100;
+x=integrate('t*cos(t)','t',0,x1);
+disp(x);
+disp('valid for t>=0');
diff --git a/3838/CH2/EX2.20.a/EX2_20_A.sce b/3838/CH2/EX2.20.a/EX2_20_A.sce
new file mode 100644
index 000000000..c2de27fef
--- /dev/null
+++ b/3838/CH2/EX2.20.a/EX2_20_A.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.20.A
+clc;
+x1=100;
+x=integrate('2*1','t',0,x1);
+disp(x);
+disp('valid for t>=0');
diff --git a/3838/CH2/EX2.21.B/EX2_21_B.sce b/3838/CH2/EX2.21.B/EX2_21_B.sce
new file mode 100644
index 000000000..e00b4b96e
--- /dev/null
+++ b/3838/CH2/EX2.21.B/EX2_21_B.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.21.B
+clc;
+x1=10;
+x=integrate('exp((-5)*t)','t',0,x1);
+disp(x)
+disp('valid for t>=0')
diff --git a/3838/CH2/EX2.21.C/EX2_21_c.sce b/3838/CH2/EX2.21.C/EX2_21_c.sce
new file mode 100644
index 000000000..dd13b09cb
--- /dev/null
+++ b/3838/CH2/EX2.21.C/EX2_21_c.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.21.C
+clc;
+x1=10;
+x=integrate('1','t',-2,x1);
+disp(x)
+disp('valid for t<=2')
diff --git a/3838/CH2/EX2.21.D/EX2_21_d.sce b/3838/CH2/EX2.21.D/EX2_21_d.sce
new file mode 100644
index 000000000..0af8e06a6
--- /dev/null
+++ b/3838/CH2/EX2.21.D/EX2_21_d.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.21.D
+clc;
+x1=10;
+x=integrate('1','t',2,x1);
+disp(x)
+disp('valid for t>=2')
diff --git a/3838/CH2/EX2.21.E/EX2_21_e.sce b/3838/CH2/EX2.21.E/EX2_21_e.sce
new file mode 100644
index 000000000..33b1bef93
--- /dev/null
+++ b/3838/CH2/EX2.21.E/EX2_21_e.sce
@@ -0,0 +1,9 @@
+//EXAMPLE 2.21.E
+clc;
+x1=100;
+x=integrate('1','t',-2,x1);
+y=integrate('1','t',2,x1);
+disp(x);
+disp('valid for t>=-2 to t<=2');
+disp(x+y);
+disp('valid for t>=2');
diff --git a/3838/CH2/EX2.21.a/EX2_21_A.sce b/3838/CH2/EX2.21.a/EX2_21_A.sce
new file mode 100644
index 000000000..a11aeea5a
--- /dev/null
+++ b/3838/CH2/EX2.21.a/EX2_21_A.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 2.21.A
+clc;
+x1=100;
+x=integrate('3*t','t',0,x1);
+disp(x);
+disp('valid for t>=0');
diff --git a/3838/CH2/EX2.22.A/EX2_22_A.sce b/3838/CH2/EX2.22.A/EX2_22_A.sce
new file mode 100644
index 000000000..f36ff8523
--- /dev/null
+++ b/3838/CH2/EX2.22.A/EX2_22_A.sce
@@ -0,0 +1,19 @@
+//EXAMPLE 2.22.A
+clc;
+t=0:1:15;
+t2=0:0.1:15
+x1=exp((-3)*t2).*(t2>=0);
+x2=t.*(t>=0);
+subplot(3,1,1);plot(t2,x1);
+xlabel('t');ylabel('x1(t)');
+title('signal x1(t)');
+subplot(3,1,2);plot(t,x2);
+xlabel('t');ylabel('x2(t)');
+title('signal x2(t)');
+T1=length(x1);
+T2=length(x2);
+x3=convol(x1,x2);
+t1=0:1:T1+T2-2;
+subplot(3,1,3);plot(t1,x3);
+xlabel('t');ylabel('x3(t)');
+title('signal x3(t) =x1(t)*x2(t)');
diff --git a/3838/CH2/EX2.22.b/EX2_22_B.sce b/3838/CH2/EX2.22.b/EX2_22_B.sce
new file mode 100644
index 000000000..1beda96b5
--- /dev/null
+++ b/3838/CH2/EX2.22.b/EX2_22_B.sce
@@ -0,0 +1,20 @@
+//EXAMPLE 2.22.B
+clc;
+t=0:1:15;
+t2=0:0.1:15
+a=2;
+x1=exp(-a*t2).*(t2>=0);
+x2=t.*(t>=0);
+subplot(3,1,1);plot(t2,x1);
+xlabel('t');ylabel('x1(t)');
+title('signal x1(t)');
+subplot(3,1,2);plot(t,x2);
+xlabel('t');ylabel('x2(t)');
+title('signal x2(t)');
+T1=length(x1);
+T2=length(x2);
+x3=convol(x1,x2);
+t1=0:1:T1+T2-2;
+subplot(3,1,3);plot(t1,x3);
+xlabel('t');ylabel('x3(t)');
+title('signal x3(t) =x1(t)*x2(t)');
diff --git a/3838/CH2/EX2.3.C/EX2_3_c.sce b/3838/CH2/EX2.3.C/EX2_3_c.sce
new file mode 100644
index 000000000..77d02850c
--- /dev/null
+++ b/3838/CH2/EX2.3.C/EX2_3_c.sce
@@ -0,0 +1,12 @@
+clc;
+t=-12:0.01:12
+x=sin(2*t)+cos(t)+0.5*(sin(3*t)-sin(t))
+h=-sin(2*t)+cos(t)-0.5*(sin(3*t)-sin(t))
+e=cos(t)//(x+h)/2
+o=(x-h)/2//sin(t)+0.5*(sin(3*t)-sin(t))
+subplot(3,1,1)
+plot(t,e)
+xtitle('even signal')
+subplot(3,1,2)
+plot(t,o)
+xtitle('odd signal')
diff --git a/3838/CH2/EX2.3.a/EX2_3_a.sce b/3838/CH2/EX2.3.a/EX2_3_a.sce
new file mode 100644
index 000000000..d2bd8c466
--- /dev/null
+++ b/3838/CH2/EX2.3.a/EX2_3_a.sce
@@ -0,0 +1,25 @@
+//ex_2.3.a even and odd signals of x(t)
+clear;
+clc;
+close;
+t = 0:0.01:5;
+x=exp(t)
+figure
+a=gca();
+xtitle('x(t)')
+plot2d(t,x)
+figure
+a=gca();
+xtitle('even signal')
+plot2d(t,x/2)
+t1=-5:1/100:0;
+plot2d(t1,x($:-1:1)/2)
+a.y_location='origin'
+figure
+a=gca();
+xtitle('odd signal')
+plot2d(t,x/2)
+t1=-5:1/100:0;
+plot2d(t1,-x($:-1:1)/2)
+a.y_location='origin'
+a.x_location='origin'
diff --git a/3838/CH2/EX2.3.b/EX2_3_b.sce b/3838/CH2/EX2.3.b/EX2_3_b.sce
new file mode 100644
index 000000000..8ac66ece2
--- /dev/null
+++ b/3838/CH2/EX2.3.b/EX2_3_b.sce
@@ -0,0 +1,25 @@
+//ex_2.3.b even and odd signals of x(t)
+clear;
+clc;
+close;
+t = 0:0.01:5;
+x=3+(2*t)+5*((t)^2)
+figure
+a=gca();
+xtitle('x(t)')
+plot2d(t,x)
+figure
+a=gca();
+xtitle('even signal')
+plot2d(t,x/2)
+t1=-5:1/100:0;
+plot2d(t1,x($:-1:1)/2)
+a.y_location='origin'
+figure
+a=gca();
+xtitle('odd signal')
+plot2d(t,x/2)
+t1=-5:1/100:0;
+plot2d(t1,-x($:-1:1)/2)
+a.y_location='origin'
+a.x_location='origin'
diff --git a/3838/CH2/EX2.4.A/EX2_4_a.sce b/3838/CH2/EX2.4.A/EX2_4_a.sce
new file mode 100644
index 000000000..c65402068
--- /dev/null
+++ b/3838/CH2/EX2.4.A/EX2_4_a.sce
@@ -0,0 +1,7 @@
+//Example 2.4.a
+//Energy of the signal x(t)=(exp(-2*a*t)).u(t)
+clc;
+a=2;
+E=integrate('exp(-a*t)^(2)','t',0,100)//Energy of the given signal
+disp(E)
+disp('AS ENERGY OF THE GIVEN SIGNAL IS FINITE HENCE THE GIVEN SIGNAL IS ENERGY SIGNAL');
diff --git a/3838/CH2/EX2.4.b/EX2_4_b.sce b/3838/CH2/EX2.4.b/EX2_4_b.sce
new file mode 100644
index 000000000..9c13b1fd3
--- /dev/null
+++ b/3838/CH2/EX2.4.b/EX2_4_b.sce
@@ -0,0 +1,6 @@
+//Example 2.4.a
+//Energy of the signal x(t)=(exp(-2*a*t)).u(t)
+clc;
+P=integrate('1^(2)','t',(-100),100)/(2*100)//power of given signal t=100
+disp(P)
+disp('AS POWER OF THE GIVEN SIGNAL IS FINITE HENCE THE GIVEN SIGNAL IS POWER SIGNAL');
diff --git a/3838/CH2/EX2.4.c/EX2_4_c.sce b/3838/CH2/EX2.4.c/EX2_4_c.sce
new file mode 100644
index 000000000..f13fa451a
--- /dev/null
+++ b/3838/CH2/EX2.4.c/EX2_4_c.sce
@@ -0,0 +1,6 @@
+//Example 2.4.c
+clc;
+a=2;
+P=(integrate('(3*cos(0.1*(%pi)*t))^(2)','t',-100,100)/(2*100))//power of given signal t=100
+disp(P)
+disp('AS POWER OF THE GIVEN SIGNAL IS FINITE HENCE THE GIVEN SIGNAL IS POWER SIGNAL');
diff --git a/3838/CH3/EX3.1.A/EX3_1_a.sce b/3838/CH3/EX3.1.A/EX3_1_a.sce
new file mode 100644
index 000000000..fd1c6d887
--- /dev/null
+++ b/3838/CH3/EX3.1.A/EX3_1_a.sce
@@ -0,0 +1,6 @@
+//Example 3.1.A
+clc;
+Syms s t;
+A=3
+laplace(A,t,s)
+
diff --git a/3838/CH3/EX3.1.B/EX3_1_b.sce b/3838/CH3/EX3.1.B/EX3_1_b.sce
new file mode 100644
index 000000000..30bb579eb
--- /dev/null
+++ b/3838/CH3/EX3.1.B/EX3_1_b.sce
@@ -0,0 +1,4 @@
+//EXAMPLE 3.1.B
+clc;
+Syms s t
+laplace(t,t,s)
diff --git a/3838/CH3/EX3.1.C/EX3_1_c.sce b/3838/CH3/EX3.1.C/EX3_1_c.sce
new file mode 100644
index 000000000..b1237874f
--- /dev/null
+++ b/3838/CH3/EX3.1.C/EX3_1_c.sce
@@ -0,0 +1,4 @@
+//EXAMPLE 3.1.C
+clc;
+Syms s t
+laplace(exp(-3*t),t,s)
diff --git a/3838/CH3/EX3.1.D/EX3_1_d.sce b/3838/CH3/EX3.1.D/EX3_1_d.sce
new file mode 100644
index 000000000..abfd394ca
--- /dev/null
+++ b/3838/CH3/EX3.1.D/EX3_1_d.sce
@@ -0,0 +1,4 @@
+//EXAMPLE 3.1.D
+clc;
+Syms s t
+laplace(-exp(-3*t),t,s)
diff --git a/3838/CH3/EX3.1.E/EX3_1_e.sce b/3838/CH3/EX3.1.E/EX3_1_e.sce
new file mode 100644
index 000000000..90d6010af
--- /dev/null
+++ b/3838/CH3/EX3.1.E/EX3_1_e.sce
@@ -0,0 +1,4 @@
+//EXAMPLE 3.1.E
+clc;
+Syms s t e
+e=laplace(exp(-4*t),t,s)-laplace(exp(4*t),t,s)
diff --git a/3838/CH3/EX3.12/EX3_12.sce b/3838/CH3/EX3.12/EX3_12.sce
new file mode 100644
index 000000000..e98e23000
--- /dev/null
+++ b/3838/CH3/EX3.12/EX3_12.sce
@@ -0,0 +1,6 @@
+//Example 3.12
+clc;
+syms s;
+I=2/((s)*(s+1)*(s+2));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.13/EX3_13.sce b/3838/CH3/EX3.13/EX3_13.sce
new file mode 100644
index 000000000..a310014b5
--- /dev/null
+++ b/3838/CH3/EX3.13/EX3_13.sce
@@ -0,0 +1,6 @@
+//Example 3.13
+clc;
+syms s;
+I=2/((s)*(s+1)*(s+2)^(2));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.14/EX3_14.sce b/3838/CH3/EX3.14/EX3_14.sce
new file mode 100644
index 000000000..1d071d656
--- /dev/null
+++ b/3838/CH3/EX3.14/EX3_14.sce
@@ -0,0 +1,6 @@
+//Example 3.14
+clc;
+syms s;
+I=1/((s+2)*(((s)^(2))+s+1));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.15/EX3_15.sce b/3838/CH3/EX3.15/EX3_15.sce
new file mode 100644
index 000000000..740adf8e9
--- /dev/null
+++ b/3838/CH3/EX3.15/EX3_15.sce
@@ -0,0 +1,6 @@
+//Example 3.15
+clc;
+syms s;
+I=4/((s^(2))*(s^(2)+16));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.16.a/EX3_16_A.sce b/3838/CH3/EX3.16.a/EX3_16_A.sce
new file mode 100644
index 000000000..3e360c6f3
--- /dev/null
+++ b/3838/CH3/EX3.16.a/EX3_16_A.sce
@@ -0,0 +1,6 @@
+//Example 3.16.A
+clc;
+syms s;
+I=(3*s^(2)+8*s+23)/((s+3)*(s^(2)+2*s+10));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.16.b/EX3_16_B.sce b/3838/CH3/EX3.16.b/EX3_16_B.sce
new file mode 100644
index 000000000..1092d7803
--- /dev/null
+++ b/3838/CH3/EX3.16.b/EX3_16_B.sce
@@ -0,0 +1,6 @@
+//Example 3.16.B
+clc;
+syms s;
+I=(8*(s^(2)))/((s+2)*(s+1)^(3));
+i=ilaplace(I);
+disp(i);
diff --git a/3838/CH3/EX3.2.A/EX3_2_A.sce b/3838/CH3/EX3.2.A/EX3_2_A.sce
new file mode 100644
index 000000000..e5637157d
--- /dev/null
+++ b/3838/CH3/EX3.2.A/EX3_2_A.sce
@@ -0,0 +1,5 @@
+//EXAMPLE 3.2.A
+clc;
+Syms s t
+w=2;
+laplace(sin(w*t),t,s)
diff --git a/3838/CH3/EX3.2.b/EX3_2_B.sce b/3838/CH3/EX3.2.b/EX3_2_B.sce
new file mode 100644
index 000000000..9a1bb0ccb
--- /dev/null
+++ b/3838/CH3/EX3.2.b/EX3_2_B.sce
@@ -0,0 +1,5 @@
+//EXAMPLE 3.2.B
+clc;
+Syms s t
+w=2;
+laplace(cos(w*t),t,s)
diff --git a/3838/CH3/EX3.2.c/EX3_2_C.sce b/3838/CH3/EX3.2.c/EX3_2_C.sce
new file mode 100644
index 000000000..34a02be95
--- /dev/null
+++ b/3838/CH3/EX3.2.c/EX3_2_C.sce
@@ -0,0 +1,5 @@
+//EXAMPLE 3.2.C
+clc;
+Syms s t
+w=2;
+laplace(cosh(w*t),t,s)
diff --git a/3838/CH3/EX3.2.d/EX3_2_D.sce b/3838/CH3/EX3.2.d/EX3_2_D.sce
new file mode 100644
index 000000000..fb0a99fba
--- /dev/null
+++ b/3838/CH3/EX3.2.d/EX3_2_D.sce
@@ -0,0 +1,7 @@
+//EXAMPLE 3.2.D
+clc;
+Syms s t
+w=2;
+a=5;
+F=exp(-a*t)*sin(w*t)
+laplace(F,t,s)
diff --git a/3838/CH3/EX3.2.e/EX3_2_E.sce b/3838/CH3/EX3.2.e/EX3_2_E.sce
new file mode 100644
index 000000000..d42d041ed
--- /dev/null
+++ b/3838/CH3/EX3.2.e/EX3_2_E.sce
@@ -0,0 +1,7 @@
+//EXAMPLE 3.2.E
+clc;
+Syms s t
+w=2;
+a=5;
+F=exp(-a*t)*cos(w*t)
+laplace(F,t,s)
diff --git a/3838/CH3/EX3.22/EX3_22.sce b/3838/CH3/EX3.22/EX3_22.sce
new file mode 100644
index 000000000..df1d08bff
--- /dev/null
+++ b/3838/CH3/EX3.22/EX3_22.sce
@@ -0,0 +1,8 @@
+//Example 3.22
+clc;
+syms s t;
+x=laplace(exp(-2*t)*cos(3*t),t,s);
+y=laplace(4*sin(3*t),t,s);
+z=x*y
+i=ilaplace(z);
+disp(i);
diff --git a/3838/CH3/EX3.24.a/EX3_24_A.sce b/3838/CH3/EX3.24.a/EX3_24_A.sce
new file mode 100644
index 000000000..26a01bc1d
--- /dev/null
+++ b/3838/CH3/EX3.24.a/EX3_24_A.sce
@@ -0,0 +1,5 @@
+//Example 3.24.a
+clc;
+Syms s t;
+x=laplace(((2+t)*(exp(-3*t)),t,s);
+disp(x);
diff --git a/3838/CH3/EX3.24.b/EX3_24_B.sce b/3838/CH3/EX3.24.b/EX3_24_B.sce
new file mode 100644
index 000000000..841c34f87
--- /dev/null
+++ b/3838/CH3/EX3.24.b/EX3_24_B.sce
@@ -0,0 +1,5 @@
+//Example 3.24.B
+clc;
+Syms s t;
+x=laplace((t^(2)-exp(-4*t)+exp(-7*t)),t,s);
+disp(x);
diff --git a/3838/CH3/EX3.24.c/EX3_24_C.sce b/3838/CH3/EX3.24.c/EX3_24_C.sce
new file mode 100644
index 000000000..bec5984b7
--- /dev/null
+++ b/3838/CH3/EX3.24.c/EX3_24_C.sce
@@ -0,0 +1,5 @@
+//Example 3.24.C
+clc;
+Syms s t;
+x=laplace((1+0.5*exp(-6*t)+0.2*exp(-3*t)),t,s);
+disp(x);
diff --git a/3838/CH3/EX3.25.a/EX3_25_A.sce b/3838/CH3/EX3.25.a/EX3_25_A.sce
new file mode 100644
index 000000000..3d7c74d18
--- /dev/null
+++ b/3838/CH3/EX3.25.a/EX3_25_A.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 3.25.A
+clc;
+Syms s,t;
+u=laplace(1,t,s)+laplace(exp(-2*t),t,s);0
+F=u*laplace(1,t,s)
+disp(F);
diff --git a/3838/CH3/EX3.25.b/EX3_25_B.sce b/3838/CH3/EX3.25.b/EX3_25_B.sce
new file mode 100644
index 000000000..e15a27ee9
--- /dev/null
+++ b/3838/CH3/EX3.25.b/EX3_25_B.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 3.25.b
+clc;
+Syms s,t;
+u=laplace((t)^(2),t,s)+laplace(t*exp(-4*t),t,s);
+F=u*laplace(1,t,s)
+disp(F);
diff --git a/3838/CH3/EX3.25.c/EX3_25_C.sce b/3838/CH3/EX3.25.c/EX3_25_C.sce
new file mode 100644
index 000000000..757a00ef8
--- /dev/null
+++ b/3838/CH3/EX3.25.c/EX3_25_C.sce
@@ -0,0 +1,6 @@
+//EXAMPLE 3.25.c
+clc;
+Syms s,t;
+u=laplace(t,t,s)+laplace(sin(t),t,s);
+F=u*laplace(1,t,s)
+disp(F);
diff --git a/3838/CH3/EX3.26.a/EX3_26_A.sce b/3838/CH3/EX3.26.a/EX3_26_A.sce
new file mode 100644
index 000000000..dec17118f
--- /dev/null
+++ b/3838/CH3/EX3.26.a/EX3_26_A.sce
@@ -0,0 +1,6 @@
+//Example 3.26.A
+clc;
+syms s;
+F=1/(s^(2)*(s-2));
+f=ilaplace(F);
+disp(f);
diff --git a/3838/CH3/EX3.26.b/EX3_26_B.sce b/3838/CH3/EX3.26.b/EX3_26_B.sce
new file mode 100644
index 000000000..8bb058fb7
--- /dev/null
+++ b/3838/CH3/EX3.26.b/EX3_26_B.sce
@@ -0,0 +1,6 @@
+//Example 3.26.B
+clc;
+syms s;
+F=1/(s*(s+1)*(s-2));
+f=ilaplace(F);
+disp(f);
diff --git a/3838/CH3/EX3.26.c/EX3_26_C.sce b/3838/CH3/EX3.26.c/EX3_26_C.sce
new file mode 100644
index 000000000..b1431f1ae
--- /dev/null
+++ b/3838/CH3/EX3.26.c/EX3_26_C.sce
@@ -0,0 +1,6 @@
+//Example 3.26.c
+clc;
+syms s;
+F=1/(s^(2)+s+1);
+f=ilaplace(F);
+disp(f);
diff --git a/3838/CH3/EX3.27.a/EX3_27_A.sce b/3838/CH3/EX3.27.a/EX3_27_A.sce
new file mode 100644
index 000000000..fd8bf3a64
--- /dev/null
+++ b/3838/CH3/EX3.27.a/EX3_27_A.sce
@@ -0,0 +1,9 @@
+//Example 3.27.A
+clc;
+a=2;
+syms s t;
+y=laplace(exp(-a*t));
+z=1*y;
+f=ilaplace(z);
+disp(f);
++9
diff --git a/3838/CH3/EX3.27.b/EX3_27_B.sce b/3838/CH3/EX3.27.b/EX3_27_B.sce
new file mode 100644
index 000000000..067e2d272
--- /dev/null
+++ b/3838/CH3/EX3.27.b/EX3_27_B.sce
@@ -0,0 +1,8 @@
+//Example 3.27.B
+clc;
+syms s t;
+x=laplace(exp(-2*t));
+y=laplace(1);
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.28.B/EX3_28_B.sce b/3838/CH3/EX3.28.B/EX3_28_B.sce
new file mode 100644
index 000000000..4e21ae86b
--- /dev/null
+++ b/3838/CH3/EX3.28.B/EX3_28_B.sce
@@ -0,0 +1,8 @@
+//Example 3.28.B
+clc;
+syms s t;
+x=laplace(exp(-2*t));
+y=laplace(exp(-5*t));
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.28.C/EX3_28_C.sce b/3838/CH3/EX3.28.C/EX3_28_C.sce
new file mode 100644
index 000000000..3ba0be3ce
--- /dev/null
+++ b/3838/CH3/EX3.28.C/EX3_28_C.sce
@@ -0,0 +1,8 @@
+//Example 3.28.c
+clc;
+syms s t;
+x=laplace(t);
+y=laplace(exp(-5*t));
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.28.D/EX3_28_D.sce b/3838/CH3/EX3.28.D/EX3_28_D.sce
new file mode 100644
index 000000000..94f5967bc
--- /dev/null
+++ b/3838/CH3/EX3.28.D/EX3_28_D.sce
@@ -0,0 +1,8 @@
+//Example 3.28.D
+clc;
+syms s t;
+x=laplace(cos(t));
+y=laplace(t);
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.28.a/EX3_28_A.sce b/3838/CH3/EX3.28.a/EX3_28_A.sce
new file mode 100644
index 000000000..2c16c96f9
--- /dev/null
+++ b/3838/CH3/EX3.28.a/EX3_28_A.sce
@@ -0,0 +1,8 @@
+//Example 3.28.A
+clc;
+syms s t;
+x=laplace(2);
+y=laplace(1);
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.29.A/EX3_29_a.sce b/3838/CH3/EX3.29.A/EX3_29_a.sce
new file mode 100644
index 000000000..0e28729a6
--- /dev/null
+++ b/3838/CH3/EX3.29.A/EX3_29_a.sce
@@ -0,0 +1,8 @@
+//Example 3.29.A
+clc;
+syms s t;
+x=laplace(2);
+y=laplace(1);
+z=x/y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.29.B/EX3_29_b.sce b/3838/CH3/EX3.29.B/EX3_29_b.sce
new file mode 100644
index 000000000..8fd7f9ed4
--- /dev/null
+++ b/3838/CH3/EX3.29.B/EX3_29_b.sce
@@ -0,0 +1,8 @@
+//Example 3.29.b
+clc;
+syms s t;
+x=laplace((1/3)*(exp(-2*t)-exp(-5*t));
+y=laplace(exp(-5*t));
+z=x/y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.29.C/EX3_29_C.sce b/3838/CH3/EX3.29.C/EX3_29_C.sce
new file mode 100644
index 000000000..f6509b7a8
--- /dev/null
+++ b/3838/CH3/EX3.29.C/EX3_29_C.sce
@@ -0,0 +1,8 @@
+//Example 3.29.C
+clc;
+syms s t;
+x=laplace((1/25)*(exp(-5*t)+5*t-1));
+y=laplace(exp(-5*t));
+z=x/y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.29.D/EX3_29_D.sce b/3838/CH3/EX3.29.D/EX3_29_D.sce
new file mode 100644
index 000000000..e2c1a99eb
--- /dev/null
+++ b/3838/CH3/EX3.29.D/EX3_29_D.sce
@@ -0,0 +1,8 @@
+//Example 3.29.d
+clc;
+syms s t;
+x=laplace(1-cos(t));
+y=laplace(t);
+z=x/y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.30.A/EX3_30_A.sce b/3838/CH3/EX3.30.A/EX3_30_A.sce
new file mode 100644
index 000000000..35351849b
--- /dev/null
+++ b/3838/CH3/EX3.30.A/EX3_30_A.sce
@@ -0,0 +1,8 @@
+//Example 3.30.A
+clc;
+syms s t;
+x=laplace(3*t);
+y=laplace(1);
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.30.B/EX3_30_B.sce b/3838/CH3/EX3.30.B/EX3_30_B.sce
new file mode 100644
index 000000000..57c373252
--- /dev/null
+++ b/3838/CH3/EX3.30.B/EX3_30_B.sce
@@ -0,0 +1,8 @@
+//Example 3.30.B
+clc;
+syms s t;
+x=laplace(exp(-5*t));
+y=laplace(1);
+z=x*y;
+f=ilaplace(z);
+disp(f);
diff --git a/3838/CH3/EX3.7.a/EX3_7_A.sce b/3838/CH3/EX3.7.a/EX3_7_A.sce
new file mode 100644
index 000000000..5db94c23d
--- /dev/null
+++ b/3838/CH3/EX3.7.a/EX3_7_A.sce
@@ -0,0 +1,5 @@
+//example 3.7.a
+clc;
+Syms s t
+F=(t^(2)-2*t)*unit_step(t-1)
+laplace(F,t,s)
diff --git a/3838/CH3/EX3.7.b/EX3_7_B.sce b/3838/CH3/EX3.7.b/EX3_7_B.sce
new file mode 100644
index 000000000..13a1e2a7d
--- /dev/null
+++ b/3838/CH3/EX3.7.b/EX3_7_B.sce
@@ -0,0 +1,6 @@
+//example 3.7.b
+clc;
+Syms s t
+a=5;
+F=(t-a)*unit_step(t-a)
+laplace(F,t,s)
diff --git a/3838/CH6/EX6.10.b/EX6_10_b.sce b/3838/CH6/EX6.10.b/EX6_10_b.sce
new file mode 100644
index 000000000..981b8d66c
--- /dev/null
+++ b/3838/CH6/EX6.10.b/EX6_10_b.sce
@@ -0,0 +1,16 @@
+//Example 6 . 6 10 b
+clc ;
+n0 =1;
+N =10;
+for n =1: N
+x ( n ) =n;
+y ( n ) =n*x(n);
+end
+inputshift = (n)*x(N-n0) ;
+outputshift = y (N - n0 ) ;
+if( inputshift == outputshift )
+disp ( 'THE GIVEN SYSTEM I S TIME INVARIANT ' )
+else
+disp ( 'THE GIVEN SYSTEM I S TIME VARIANT ' ) ;
+end
+
diff --git a/3838/CH6/EX6.12.a/EX6_12_A.sce b/3838/CH6/EX6.12.a/EX6_12_A.sce
new file mode 100644
index 000000000..ff5f27e12
--- /dev/null
+++ b/3838/CH6/EX6.12.a/EX6_12_A.sce
@@ -0,0 +1,33 @@
+//example 6.12.a
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = n*x1(n);
+  y2(n) = n*x2(n);
+  y3(n) = n*x3(n);
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.12.c/EX6_12_C.sce b/3838/CH6/EX6.12.c/EX6_12_C.sce
new file mode 100644
index 000000000..8835cfa96
--- /dev/null
+++ b/3838/CH6/EX6.12.c/EX6_12_C.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 6.12.C
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = (x1(n)^2);
+  y2(n) = (x2(n)^2);
+  y3(n) = (x3(n)^2);
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.12.d/EX6_12_D.sce b/3838/CH6/EX6.12.d/EX6_12_D.sce
new file mode 100644
index 000000000..f72fa4c19
--- /dev/null
+++ b/3838/CH6/EX6.12.d/EX6_12_D.sce
@@ -0,0 +1,35 @@
+//EXAMPLE 6.12.D
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+A=2
+B=3;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = A*x1(n)+B;
+  y2(n) = A*x2(n)+B;
+  y3(n) = A*x3(n)+B;
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.12.e/EX6_12_E.sce b/3838/CH6/EX6.12.e/EX6_12_E.sce
new file mode 100644
index 000000000..7e093f054
--- /dev/null
+++ b/3838/CH6/EX6.12.e/EX6_12_E.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 6.12.e
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = exp(x1(n));
+  y2(n) = exp(x2(n));
+  y3(n) = exp(x3(n));
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.13.a/EX6_13_A.sce b/3838/CH6/EX6.13.a/EX6_13_A.sce
new file mode 100644
index 000000000..6abc12438
--- /dev/null
+++ b/3838/CH6/EX6.13.a/EX6_13_A.sce
@@ -0,0 +1,34 @@
+//EXAMPLE 6.13.a
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+C=3;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = x1(n)+C;
+  y2(n) = x2(n)+C;
+  y3(n) = x3(n)+C;
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.13.b/EX6_13_B.sce b/3838/CH6/EX6.13.b/EX6_13_B.sce
new file mode 100644
index 000000000..2aa460e20
--- /dev/null
+++ b/3838/CH6/EX6.13.b/EX6_13_B.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 6.13.b
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = a^(x1(n));
+  y2(n) = a^(x2(n));
+  y3(n) = a^(x3(n));
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.13.c/EX6_13_C.sce b/3838/CH6/EX6.13.c/EX6_13_C.sce
new file mode 100644
index 000000000..c586cbb22
--- /dev/null
+++ b/3838/CH6/EX6.13.c/EX6_13_C.sce
@@ -0,0 +1,33 @@
+//EXAMPLE 6.13.C
+clear;
+clc;
+x1 = [1,1,1,1];
+x2 = [2,2,2,2];
+a = 1;
+b = 1;
+for n = 1:length(x1)
+  x3(n) = a*x1(n)+b*x2(n);
+end
+for n = 1:length(x1)
+  y1(n) = n*(x1(n))^(2);
+  y2(n) = n*(x2(n))^(2);
+  y3(n) = n*(x3(n))^(2);
+end
+for n = 1:length(y1)
+  z(n) = a*y1(n)+b*y2(n);
+end
+count = 0;
+for n =1:length(y1)
+  if(y3(n)== z(n))
+    count = count+1;
+  end
+end
+if(count == length(y3))
+   disp('Since It satisifies the superposition principle')
+   disp('The given system is a Linear system')
+   y3
+   z
+  else
+    disp('Since It does not satisify the superposition principle')
+    disp('The given system is a Non-Linear system')
+end
diff --git a/3838/CH6/EX6.4.A/EX6_4_A.sce b/3838/CH6/EX6.4.A/EX6_4_A.sce
new file mode 100644
index 000000000..fbf51c98a
--- /dev/null
+++ b/3838/CH6/EX6.4.A/EX6_4_A.sce
@@ -0,0 +1,9 @@
+//example 6.4.A
+//check the signal is periodic or not
+clc ;
+n=-15:0.01:15;
+y =sin((6*(%pi)*n/7)+1);
+xlabel('n')
+ylabel('x(n)')
+plot2d(n,y);
+disp ( 'Plot  shows that given signal is periodic of fundamental period=7 samples' ) ;
diff --git a/3838/CH6/EX6.4.b/EX6_4_B.sce b/3838/CH6/EX6.4.b/EX6_4_B.sce
new file mode 100644
index 000000000..d2a69a522
--- /dev/null
+++ b/3838/CH6/EX6.4.b/EX6_4_B.sce
@@ -0,0 +1,9 @@
+//example 6_4_B
+//check the signal is periodic or not
+clc ;
+n=-15:0.01:15;
+y =cos((n/8)-(%pi));
+xlabel('n')
+ylabel('x(n)')
+plot(n,y);
+disp ( 'Plot  shows that given signal is NOT periodic ' ) ;
diff --git a/3838/CH6/EX6.4.c/EX6_4_C.sce b/3838/CH6/EX6.4.c/EX6_4_C.sce
new file mode 100644
index 000000000..1f3fa7788
--- /dev/null
+++ b/3838/CH6/EX6.4.c/EX6_4_C.sce
@@ -0,0 +1,9 @@
+//example 6.4.C
+//check the signal is periodic or not
+clc ;
+n=-15:0.01:15;
+y =(1+cos(2*(%pi)*n/8)/2);
+xlabel('n')
+ylabel('x(n)')
+plot(n,y);
+disp ( 'Plot  shows that given signal is periodic of fundamental period=4 samples' ) ;
diff --git a/3838/CH6/EX6.4.d/EX6_4_D.sce b/3838/CH6/EX6.4.d/EX6_4_D.sce
new file mode 100644
index 000000000..f1358a845
--- /dev/null
+++ b/3838/CH6/EX6.4.d/EX6_4_D.sce
@@ -0,0 +1,9 @@
+//example 6.4.d
+//check the signal is periodic or not
+clc ;
+n=-15:0.01:15;
+y =(cos(7*%pi*n)+%i*sin(7*%pi*n));
+xlabel('n')
+ylabel('x(n)')
+plot(n,y);
+disp ( 'Plot  shows that given signal is periodic of fundamental period=2 samples' ) ;
diff --git a/3838/CH6/EX6.5.a/EX6_5_A.sce b/3838/CH6/EX6.5.a/EX6_5_A.sce
new file mode 100644
index 000000000..603fe9206
--- /dev/null
+++ b/3838/CH6/EX6.5.a/EX6_5_A.sce
@@ -0,0 +1,26 @@
+//ex_6.5.a even and odd signals of x(n)
+clear;
+clc;
+close;
+a=2;
+n= 0:0.01:5;
+x=a^(n);
+figure
+a=gca();
+xtitle('x(n)')
+plot2d(n,x)
+figure
+a=gca();
+xtitle('even signal')
+plot2d(n,x/2)
+t1=-5:1/100:0;
+plot2d(t1,x($:-1:1)/2)
+a.y_location='origin'
+figure
+a=gca();
+xtitle('odd signal')
+plot2d(n,x/2)
+t1=-5:1/100:0;
+plot2d(t1,-x($:-1:1)/2)
+a.y_location='origin'
+a.x_location='origin'
diff --git a/3838/CH6/EX6.5.b/EX6_5_B.sce b/3838/CH6/EX6.5.b/EX6_5_B.sce
new file mode 100644
index 000000000..2449ba8ff
--- /dev/null
+++ b/3838/CH6/EX6.5.b/EX6_5_B.sce
@@ -0,0 +1,25 @@
+//ex_6.5.b even and odd signals of x(n)
+clear;
+clc;
+close;
+n= 0:0.01:5;
+x=2*exp(%i*((%pi)/3)*n);
+figure
+a=gca();
+xtitle('x(n)')
+plot2d(n,x)
+figure
+a=gca();
+xtitle('even signal')
+plot2d(n,x/2)
+t1=-5:1/100:0;
+plot2d(t1,x($:-1:1)/2)
+a.y_location='origin'
+figure
+a=gca();
+xtitle('odd signal')
+plot2d(n,x/2)
+t1=-5:1/100:0;
+plot2d(t1,-x($:-1:1)/2)
+a.y_location='origin'
+a.x_location='origin'
diff --git a/3838/CH6/EX6.6.a/EX6_6_A.sce b/3838/CH6/EX6.6.a/EX6_6_A.sce
new file mode 100644
index 000000000..d68cfd28a
--- /dev/null
+++ b/3838/CH6/EX6.6.a/EX6_6_A.sce
@@ -0,0 +1,7 @@
+//ex 6.6.a
+clc;
+E=(1/(1-(0.25)^(2)))
+disp(E);
+disp('AS THE ENERGY OF THE SIGNAL IS FINITE HENCE THE FOLLOWING SIGNALIS ENERGY SIGNAL');
+
+
diff --git a/3838/CH6/EX6.6.c/EX6_6_C.sce b/3838/CH6/EX6.6.c/EX6_6_C.sce
new file mode 100644
index 000000000..92032fd78
--- /dev/null
+++ b/3838/CH6/EX6.6.c/EX6_6_C.sce
@@ -0,0 +1,8 @@
+//ex 6.6.c
+clc;
+N=100//ASSUMING THE N=100
+p=(N)/(2*N)//AS LIMIT N TENDS TO INFINITY HENCE THE EQUATION
+disp(p);
+disp('AS THE POWER OF THE SIGNAL IS FINITE HENCE THE FOLLOWING SIGNALIS POWER SIGNAL');
+
+
diff --git a/3838/CH7/EX7.2.A/EX7_2_A.sce b/3838/CH7/EX7.2.A/EX7_2_A.sce
new file mode 100644
index 000000000..fe8acb2f1
--- /dev/null
+++ b/3838/CH7/EX7.2.A/EX7_2_A.sce
@@ -0,0 +1,6 @@
+//Example 7.2.A
+clc;
+syms a z n;
+x=1;
+X=symsum(x*(z^-n),n,0,%inf);
+disp(X,'X(z)=');
diff --git a/3838/CH7/EX7.2.B/EX7_2_B.sce b/3838/CH7/EX7.2.B/EX7_2_B.sce
new file mode 100644
index 000000000..c3d0f4822
--- /dev/null
+++ b/3838/CH7/EX7.2.B/EX7_2_B.sce
@@ -0,0 +1,6 @@
+//Example 7.2.B
+clc;
+syms a z n;
+x=(0.5)^(n);
+X=symsum(x*(z^-n),n,0,%inf);
+disp(X,'X(z)=');
diff --git a/3838/CH7/EX7.2.c/EX7_2_C.sce b/3838/CH7/EX7.2.c/EX7_2_C.sce
new file mode 100644
index 000000000..7c82cbd83
--- /dev/null
+++ b/3838/CH7/EX7.2.c/EX7_2_C.sce
@@ -0,0 +1,6 @@
+//Example 7.2.C
+clc;
+syms a z n;
+x=0.8^(n);
+X=symsum(x*(z^-n),n,-(%inf),-1);
+disp(X,'X(z)=');
diff --git a/3838/CH7/EX7.2.d/EX7_2_D.sce b/3838/CH7/EX7.2.d/EX7_2_D.sce
new file mode 100644
index 000000000..2264d412b
--- /dev/null
+++ b/3838/CH7/EX7.2.d/EX7_2_D.sce
@@ -0,0 +1,8 @@
+//Example 7.2.D
+clc;
+syms a z n;
+x=(0.5)^(n);
+X=symsum(x*(z^-n),n,0,%inf);
+d=0.8^(n);
+D=symsum(d*(z^-n),n,-(%inf),-1);
+disp(D+X,'X(z)=');