initial commit / add all books

31 files changed, 624 insertions, 0 deletions

diff --git a/2384/CH2/EX2.1/ex2_1.sce b/2384/CH2/EX2.1/ex2_1.sce
new file mode 100755
index 000000000..9e5e05ce0
--- /dev/null
+++ b/2384/CH2/EX2.1/ex2_1.sce
@@ -0,0 +1,18 @@
+// Exa 2.1

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 6;// in ohm

+R2 = 6;// in ohm

+R3 = 6;// in ohm

+V = 24;// in V

+R_T =R1+R1*R2/(R1+R2);// in ohm

+I_T = V/R_T;// in A

+I1 = (R1/(R1+R2))*I_T;// in A

+V = 12;// in V

+I_T = V/R_T;// in A

+I2 = (R1/(R1+R2))*I_T;// in A

+I = I1+I2;// in A

+disp(I,"The current in A is");

diff --git a/2384/CH2/EX2.10/ex2_10.sce b/2384/CH2/EX2.10/ex2_10.sce
new file mode 100755
index 000000000..ba374e843
--- /dev/null
+++ b/2384/CH2/EX2.10/ex2_10.sce
@@ -0,0 +1,20 @@
+// Exa 2.10

+clc;

+clear;

+close;

+format('v',7)

+// Given data

+R1 = 8;// in ohm

+R2 = 5;// in ohm

+R3 = 2;// in ohm

+R_L = 10;// in ohm

+V1= 20;// in V

+V2= 12;// in V

+// V1-R3*I - R2*I = 0;

+I = V1/(R2+R3);// in A

+// Vth + V2 - R3*I = 0;

+Vth = R3*I - V2;// in V

+Rth = ((R2*R3)/(R2+R3)) + R1;// in ohm

+// current through 10 ohm resistance 

+I_L = abs(Vth)/(Rth+R_L);// in A

+disp(I_L,"The current through 10 ohm resistance in A is");

diff --git a/2384/CH2/EX2.11/ex2_11.sce b/2384/CH2/EX2.11/ex2_11.sce
new file mode 100755
index 000000000..b653481b3
--- /dev/null
+++ b/2384/CH2/EX2.11/ex2_11.sce
@@ -0,0 +1,20 @@
+// Exa 2.11

+clc;

+clear;

+close;

+format('v',4)

+// Given data

+R1 = 4;// in ohm

+R2 = 3;// in ohm

+R3 = 2;// in ohm

+R_L = 5;// in ohm

+I = 6;// in A

+V = 15;// in V

+// V-R1*I1-R3*(I1+I) = 0;

+I1 = (V-R3*I)/(R1+R3);// in A

+I = I1 + I;// in A

+Vth = R3*I;// in V

+Rth = ((R1*R3)/(R1+R3)) + R2;// in ohm

+// current in 5 ohm resistance 

+I_L = Vth/(Rth+R_L);// in A

+disp(I_L,"The current in 5 ohm resistance in A is");

diff --git a/2384/CH2/EX2.12/ex2_12.sce b/2384/CH2/EX2.12/ex2_12.sce
new file mode 100755
index 000000000..4764f7196
--- /dev/null
+++ b/2384/CH2/EX2.12/ex2_12.sce
@@ -0,0 +1,17 @@
+// Exa 2.12

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 8;// in ohm

+R2 = 32;// in ohm

+V = 60;// in V

+I1= 5;// in A

+I2= 3;// in A

+// Vth-R1*I1-(I1+I2)*R2-V=0

+Vth= R1*I1+(I1+I2)*R2+V

+Rth = R1+R2;// in ohm

+disp(Vth,"The value of Vth in volts is : ")

+disp(Rth,"The value of Rth in ohm is : ");

+

diff --git a/2384/CH2/EX2.13/ex2_13.sce b/2384/CH2/EX2.13/ex2_13.sce
new file mode 100755
index 000000000..bd8cccd8f
--- /dev/null
+++ b/2384/CH2/EX2.13/ex2_13.sce
@@ -0,0 +1,19 @@
+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 6;// in ohm

+R2 = 4;// in ohm

+R3 = 3;// in ohm

+R_L = 6;// in ohm

+V1 = 6;// in V

+V2= 15;// in V

+// V1 - R1*I - R3*I -V2 = 0;

+I= (V1-V2)/(R1+R3)

+Vth = V2 + (R3*I);// in V

+Rth = ((R1*R3)/(R1+R3)) + R2;// in ohm

+I_N = Vth/Rth;// in A

+// current through 6 ohm resistor 

+I = (I_N*Rth)/(Rth+R_L);// in A

+disp(I,"The current through 6 ohm resistor in A is");

diff --git a/2384/CH2/EX2.14/ex2_14.sce b/2384/CH2/EX2.14/ex2_14.sce
new file mode 100755
index 000000000..788a27fd5
--- /dev/null
+++ b/2384/CH2/EX2.14/ex2_14.sce
@@ -0,0 +1,21 @@
+// Exa 2.14

+clc;

+clear;

+close;

+format('v',7)

+// Given data

+R1 = 5;// in ohm

+R2 = 2;// in ohm

+R3 = 8;// in ohm

+V1 = 20;// in V

+V2 = 12;// in V

+// V1-R2*I-R1*I = 0;

+I = V1/(R1+R2);// in A

+// Vth + V2 - R2*I = 0;

+Vth = (R2*I) - V2;// in V

+Rth = ((R1*R2)/(R1+R2)) + R3;// in ohm

+I_N = Vth/Rth;// in A

+R_L = 10;// in ohm

+// current through 10 ohm resistace 

+I = (abs(I_N)*Rth)/(Rth+R_L);// in A

+disp(I,"The current through 10 ohm resistace in A is");

diff --git a/2384/CH2/EX2.15/ex2_15.sce b/2384/CH2/EX2.15/ex2_15.sce
new file mode 100755
index 000000000..e8fe15e22
--- /dev/null
+++ b/2384/CH2/EX2.15/ex2_15.sce
@@ -0,0 +1,21 @@
+// Exa 2.15

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+V = 15;// in V

+R1 = 4;// in  ohm

+R2 = 3;// in ohm

+R3 = 2;// in ohm

+R_L = 5;// in ohm

+Ig = 6;// in A

+// V - R1*I1 - R3*(I1+Ig) = 0;

+I1 = (V-R3*Ig)/(R1+R3);// in A

+I = I1 + Ig;// in A

+Vth = R3*I;// in V

+Rth = ((R1*R3)/(R1+R3)) + R2;// in ohm

+I_N = Vth/Rth;// in A

+// current through 5 ohm resistor 

+I = (I_N*Rth)/(Rth+R_L);// in A

+disp(I,"The current through 5 ohm resistor in A is");

diff --git a/2384/CH2/EX2.16/ex2_16.sce b/2384/CH2/EX2.16/ex2_16.sce
new file mode 100755
index 000000000..c6c1ba969
--- /dev/null
+++ b/2384/CH2/EX2.16/ex2_16.sce
@@ -0,0 +1,14 @@
+// Exa 2.16

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+V = 6;// in V

+R1 = 2;// in ohm

+R2 = 1;// in ohm

+R3 = 3;//in ohm

+R4 = 2;// in ohm

+Rth=(R1*R2/(R1+R2)+R3)*R4/((R1*R2/(R1+R2)+R3)+R4)

+R_L = Rth;// in ohm

+disp(R_L,"The value of R in ohm is");

diff --git a/2384/CH2/EX2.17/ex2_17.sce b/2384/CH2/EX2.17/ex2_17.sce
new file mode 100755
index 000000000..9958950ea
--- /dev/null
+++ b/2384/CH2/EX2.17/ex2_17.sce
@@ -0,0 +1,18 @@
+// Exa 2.17

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+R1 = 10;// in ohm

+R2 = 10;// in ohm

+R3 = 4;// in ohm

+V = 20;// in V

+// V - R1*I1 - R2*I1 = 0;

+I1 = V/(R1+R2);// in A

+Vth = R1*I1;// in V

+Rth =R1*R2/(R1+R2)+R3

+R_L = Rth;// in ohm

+disp(R_L,"The value of load resistance in ohm is");

+Pmax = (Vth^2)/(4*Rth);// in W

+disp(Pmax,"The power delivered to the load in W is");

diff --git a/2384/CH2/EX2.18/ex2_18.sce b/2384/CH2/EX2.18/ex2_18.sce
new file mode 100755
index 000000000..b9646e4e5
--- /dev/null
+++ b/2384/CH2/EX2.18/ex2_18.sce
@@ -0,0 +1,21 @@
+// Exa 2.18

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 3;// in ohm

+R2 = 9;// in ohm

+R3 = 6;// in ohm

+V1 = 120;// in V

+V2 = 60;// in V

+R = (R3*R2)/(R3+R2);// in ohm

+R_T = R+R1;// in ohm

+I_T = V1/R_T;// in A

+I1 = (R2/(R2+R3)) * I_T;// in A

+R_T = 2 + R2;// in  ohm

+I_T = V2/R_T;// in A

+I2 = (R1/(R1+R3)) * I_T;// in A

+// current through 6 ohm resistor 

+I = I1-I2;// in A

+disp(I,"The current through 6 ohm resistor in A is");

diff --git a/2384/CH2/EX2.19/ex2_19.sce b/2384/CH2/EX2.19/ex2_19.sce
new file mode 100755
index 000000000..5c7173c11
--- /dev/null
+++ b/2384/CH2/EX2.19/ex2_19.sce
@@ -0,0 +1,24 @@
+// Exa 2.19

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 36;// in ohm

+R2 = 12;// in ohm

+R3 = 8;// in ohm

+V1 = 90;// in V

+V2 = 60;// in V

+R_T = (R2*R3)/(R2+R3)+R1;// in ohm

+I_T = V1/R_T;// in A

+I1 = (R2/(R2+R3)) * I_T;// in A

+R = (R1*R3)/(R1+R3);// in ohm

+R_T = R2+R;// in ohm

+I_T = V2/R_T;// in A 

+I2 = (R1/(R1+R3))*I_T;// in A

+Ra = (R1*R2)/(R1+R2);// in ohm asumed

+I_T = 2;// in A

+I3 = (Ra/(Ra+R3))*I_T;// in A

+// current in 8 ohm resistor 

+I = I1+I2+I3;// in A

+disp(I,"The current in 8 ohm resistor in A is");

diff --git a/2384/CH2/EX2.2/ex2_2.sce b/2384/CH2/EX2.2/ex2_2.sce
new file mode 100755
index 000000000..7a42ba887
--- /dev/null
+++ b/2384/CH2/EX2.2/ex2_2.sce
@@ -0,0 +1,17 @@
+// Exa 2.2

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 5;// in ohm

+Vth= 10;// in ohm

+R2 = 7;// in ohm

+R3=10;// in ohm

+R_L = 12;// in ohm

+V = 20;// in ohm

+Vth = (Vth*V)/(R1+R3);// in V

+Rth = R2 + ((Vth*R1)/(Vth+R1));// in ohm

+// The current through 12 ohm resistor 

+I = Vth/(Rth+R_L);// in A

+disp(I,"The current through 12 ohm resistor in A is");

diff --git a/2384/CH2/EX2.20/ex2_20.sce b/2384/CH2/EX2.20/ex2_20.sce
new file mode 100755
index 000000000..ce4f2014f
--- /dev/null
+++ b/2384/CH2/EX2.20/ex2_20.sce
@@ -0,0 +1,20 @@
+// Exa 2.20

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 5;// in ohm

+R2 = 10;// in ohm

+R3 = 5;// in ohm

+V1 = 60;// in v

+V2 = 30;// in V

+//-R1*i1 - R3*i1 - V2+V1 = 0;

+i1 = (V2-V1)/(R1+R3);// in A

+V_acrossR3 = R3*i1;// in V

+Vth = V_acrossR3+V1;// in V

+V_AB =Vth;// in V

+disp(V_AB,"The Thevenins voltage in V is");

+R = (R1*R3)/(R1+R3);// in ohm

+Rth = R2+R;// in ohm

+disp(Rth,"The Thevenins resistance in ohm is");

diff --git a/2384/CH2/EX2.21/ex2_21.sce b/2384/CH2/EX2.21/ex2_21.sce
new file mode 100755
index 000000000..806e15572
--- /dev/null
+++ b/2384/CH2/EX2.21/ex2_21.sce
@@ -0,0 +1,19 @@
+// Exa 2.21

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+R1 = 4;// in ohm

+R2 = 3;// in  ohm

+R3 = 2;// in ohm

+R_L = 5;// in ohm

+V = 15;// in V

+I2 = 6;// in A

+// -R1*I1 - R3*I1 + R3*I2 + V = 0;

+I1 = (V+R3*I2)/(R1+R3);// in A

+Vth = I2/R3;// in V

+V_CD = Vth;// in V

+Rth = (R1*R3)/(R1+R3)+R2;// in ohm

+I = Vth/(Rth+R_L);// in A

+disp(I,"The current flowing through 5 ohm resistor in A is");

diff --git a/2384/CH2/EX2.22/ex2_22.sce b/2384/CH2/EX2.22/ex2_22.sce
new file mode 100755
index 000000000..8b9e61b47
--- /dev/null
+++ b/2384/CH2/EX2.22/ex2_22.sce
@@ -0,0 +1,22 @@
+// Exa 2.22

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+R1 = 20;// in ohm

+R2 = 5;// in ohm

+R3 = 3;// in ohm

+R4 = 2;// in ohm

+V = 30;// in V

+I1=4;// in A

+V1= I1*R3;// in V

+// R1*I -R2*I+V = 0;

+I = V/(R1+R2);// in A

+V_acrossR2= R2*I;// in V

+V_AB = V_acrossR2-V1;// in V

+Vth = abs(V_AB);// in V

+Rth = (R1*R2)/(R1+R2)+R3+R4;// in ohm

+disp(Rth,"The value of Rth in ohm is");

+I_N = Vth/Rth;// in A

+disp(I_N,"The value of I_N in A is");

diff --git a/2384/CH2/EX2.23/ex2_23.sce b/2384/CH2/EX2.23/ex2_23.sce
new file mode 100755
index 000000000..011b334a4
--- /dev/null
+++ b/2384/CH2/EX2.23/ex2_23.sce
@@ -0,0 +1,21 @@
+// Exa 2.23

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 2;// in ohm

+R2 = 4;// in ohm

+R3 = 6;// in ohm

+R4 = 4;// in ohm

+V = 16;// in v

+I1= 8;// in A

+V1= I1*R2;// in V

+I2= 16;// in A

+V2= I2*R3;// in V

+// Applying KVL : R2*I+V1+R3*I-V2+V+R1*I

+I= (V2-V1-V)/(R1+R2+R3);// in A

+Vth= V2-R3*I;// in V

+Rth= (R1+R2)*R3/((R1+R2)+R3)+R4;// in ohm

+disp(Vth,"The value of Vth in volts is : ")

+disp(Rth,"The value of Rth in ohm is : ")

diff --git a/2384/CH2/EX2.24/ex2_24.sce b/2384/CH2/EX2.24/ex2_24.sce
new file mode 100755
index 000000000..f8c065bd2
--- /dev/null
+++ b/2384/CH2/EX2.24/ex2_24.sce
@@ -0,0 +1,16 @@
+// Exa 2.24

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 3;// in ohm

+R2 = 2;// in ohm

+R3 = 1;// in ohm

+R4 = 8;// in ohm

+R5 = 2;// in ohm

+V = 10;// in V

+R = ((R1+R2)*R5)/((R1+R2)+R5);// in ohm

+Rth = R + R3;// in ohm

+R_L = Rth;// in ohm

+disp(R_L,"The value of load resistance in ohm is");

diff --git a/2384/CH2/EX2.25/ex2_25.sce b/2384/CH2/EX2.25/ex2_25.sce
new file mode 100755
index 000000000..59eaa804b
--- /dev/null
+++ b/2384/CH2/EX2.25/ex2_25.sce
@@ -0,0 +1,21 @@
+// Exa 2.25

+clc;

+clear;

+close;

+format('v',8)

+// Given data

+V = 250;// in V

+R1 = 10;// in ohm

+R2 = 10;// in ohm

+R3 = 10;// in ohm

+R4 = 10;// in ohm

+I2 = 20;// in A.

+//Applying KVL in GEFHG :  -R1*I1-R2*I1-R2*I2 + V = 0;

+I1= (V-R2*I2)/(R1+R2);// in A

+V_AB= R3*I2+V-R1*I1;// in V

+Vth = V_AB;// in V

+Rth = (R1*R2)/(R1+R2)+R3+R4;// in ohm

+R_L = Rth;// in ohm

+disp(R_L,"The value of R_L in ohm is");

+Pmax = (Vth^2)/(4*R_L);//maximum power  in W

+disp(Pmax,"The value of maximum power in W is");

diff --git a/2384/CH2/EX2.26/ex2_26.sce b/2384/CH2/EX2.26/ex2_26.sce
new file mode 100755
index 000000000..e8155bcb0
--- /dev/null
+++ b/2384/CH2/EX2.26/ex2_26.sce
@@ -0,0 +1,20 @@
+// Exa 2.26

+clc;

+clear;

+close;

+format('v',7)

+// Given data

+R1 = 2;// in ohm

+R2 = 4;// in ohm

+R_L = 4;// in ohm

+V1 = 6;// in v

+V2 = 12;// in V

+// -R2*Ix -R1*Ix-V1+V2= 0;

+Ix = (V2-V1)/(R1+R2);// in A

+Vth = V1+R1*Ix;// in V

+Rth = (R1*R2)/(R1+R2);// in ohm

+I_N = Vth/Rth;// in A

+I = (I_N*Rth)/(Rth+R_L);// in A

+disp(I,"The current in A is"); 

+

+// Note: At last, there is calculation error to find the value of I, so the answer in the book is wrong.

diff --git a/2384/CH2/EX2.27/ex2_27.sce b/2384/CH2/EX2.27/ex2_27.sce
new file mode 100755
index 000000000..54b1087c5
--- /dev/null
+++ b/2384/CH2/EX2.27/ex2_27.sce
@@ -0,0 +1,23 @@
+// Exa 2.27

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 3;// in ohm

+R2 = 6;// in ohm

+R_L = 4;// in ohm

+V = 27;// in V

+I=3;// in A

+// -I1+I2= I     (i)

+// Applying KVL: I1*R1+I2*R2=V  (ii)

+A= [-1 R1; 1 R2];

+B= [I V]

+I= B*A^-1;// Solving eq(i) and (2) by Matrix method

+I1= I(1);// in A

+I2= I(2);// in A

+Vth= R2*I2;// in V

+Rth= R1*R2/(R1+R2);// in ohm

+// current in 4 ohm resistor 

+I= Vth/(Rth+R_L);// in A

+disp(I,"The current in 4 ohm resistor in A is : ")

diff --git a/2384/CH2/EX2.28/ex2_28.sce b/2384/CH2/EX2.28/ex2_28.sce
new file mode 100755
index 000000000..9dde05b4c
--- /dev/null
+++ b/2384/CH2/EX2.28/ex2_28.sce
@@ -0,0 +1,24 @@
+// Exa 2.28

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+R1 = 20;// in ohm

+R2 = 12;// in ohm

+R3 = 8;// in ohm

+V1 = 90;// in V

+V2 = 60;// in V

+R_T = R1 + ((R2*R3)/(R2+R3));// in ohm

+I_T = V1/R_T;// in A

+I1 = I_T;// in A

+R_T = R2 + ((R1*R3)/(R1+R3));// in ohm

+I_T = V2/R_T;// in A

+I2 = (R3/(R3+R1))*I_T;// in A

+R_T = R1 + ((R2*R3)/(R2+R3));// in ohm

+I_T = 2;// in A (given)

+R = (R2*R3)/(R2+R3);// in ohm

+I3 = (R/(R1+R))*I_T;// in A

+// current in 20 ohm resistor 

+I20 = I1-I2-I3;// in A

+disp(I20,"The current in 20 ohm resistor in A is");

diff --git a/2384/CH2/EX2.29/ex2_29.sce b/2384/CH2/EX2.29/ex2_29.sce
new file mode 100755
index 000000000..1a287aa3a
--- /dev/null
+++ b/2384/CH2/EX2.29/ex2_29.sce
@@ -0,0 +1,21 @@
+// Exa 2.29

+clc;

+clear;

+close;

+format('v',7)

+// Given data

+R1 = 10;// in ohm

+R2 = 20;// in ohm

+R3 = 60;// in ohm

+R4 = 30;// in ohm

+E1 = 120;// in V

+E2 = 60;// in V

+R_T = ((R2*R3)/(R2+R3)) + R4+R1;// in ohm

+I_T = E1/R_T;// in A

+I1 = (R3/(R2+R3))*I_T;// in A

+R_T = ( ((R1+R4)*R2)/((R1+R4)+R2) ) + R3;// in ohm

+I_T = E2/R_T;// in A

+I2 = ((R1+R4)/(R1+R4+R2))*I_T;// in A

+// current through R2 resistor 

+I= I1+I2;// in A

+disp(I,"The current through R2 resistor in A is");

diff --git a/2384/CH2/EX2.3/ex2_3.sce b/2384/CH2/EX2.3/ex2_3.sce
new file mode 100755
index 000000000..278a4940e
--- /dev/null
+++ b/2384/CH2/EX2.3/ex2_3.sce
@@ -0,0 +1,17 @@
+// Exa 2.3

+clc;

+clear;

+close;

+format('v',6)

+// Given data

+R1 = 6;// in ohm

+R2 = 7;// in ohm

+R3 = 4;// in ohm

+R_L = 12;// in ohm

+V = 30;// in V

+Vth = (R3*V)/(R3+R1);// in V

+Rth = R2 + ((R3*R1)/(R3+R1)) ;// in ohm

+I_N = Vth/Rth;// in A

+//The current through 12 ohm resistor 

+I = (I_N*Rth)/(Rth+R_L);// in ohm

+disp(I,"The current through 12 ohm resistor in A is");

diff --git a/2384/CH2/EX2.30/ex2_30.sce b/2384/CH2/EX2.30/ex2_30.sce
new file mode 100755
index 000000000..6bd98d880
--- /dev/null
+++ b/2384/CH2/EX2.30/ex2_30.sce
@@ -0,0 +1,27 @@
+// Exa 2.30

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 4;// in ohm

+R2 = 4;// in ohm

+R3 = 8;// in ohm

+Ig = 3;// in A 

+V = 15;// in V

+I1 = R1/(R1+R2)*Ig;// in A

+I2 = -I1;// in A

+I3 = 0;// in A

+R_T = ((R1+R2)*R3)/((R1+R2)+R3);// in ohm

+I_T = V/R_T;// in A

+I_2= R3/(R1+R2+R3)*I_T;// in A

+I_1 = I_2;// in A

+// Total current through upper 4 Ω resistor 

+tot_cur_up_4ohm= I1+I2;// in A

+// Total current through lower 4 Ω resistor 

+tot_cur_low_4ohm= I_1+I_2;// in A

+// Total current through 8Ω resistor 

+tot_cur_8ohm= I3+I_T;// in A

+disp(tot_cur_up_4ohm,"Total current through upper 4 Ω resistor in A is : ")

+disp(tot_cur_low_4ohm,"Total current through lower 4 Ω resistor in A is : ")

+disp(tot_cur_8ohm,"Total current through 8 Ω resistor in A is : ")

diff --git a/2384/CH2/EX2.31/ex2_31.sce b/2384/CH2/EX2.31/ex2_31.sce
new file mode 100755
index 000000000..d4717a36e
--- /dev/null
+++ b/2384/CH2/EX2.31/ex2_31.sce
@@ -0,0 +1,28 @@
+// Exa 2.31

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 5;// in ohm

+R2 = 5;// in ohm

+R3 = 10;// in ohm

+V = 10;// in V

+Ig = 2;// in A 

+I2 = (R1/R3)*Ig;// in A

+I1 = I2;// in A

+I3 = 0;// in A

+R_T = ((R1+R2)*R3)/((R1+R2)+R3);// in ohm

+I_T = V/R_T;// in A

+I_2 = (R3/((R1+R2)+R3))*I_T;// in A

+I_1 = I_2;// in A

+I_3 = I_1;// in A

+// Total current through upper in 5 Ω resistor 

+tot_cur_up_5ohm = I1-I2;// in A

+// Total current through lower in 5 Ω resistor 

+tot_cur_low_5ohm = I_1+I_2;// in A

+// Total current through 10 Ω resistor 

+tot_cur_10ohm =  I3+I_3;// in A

+disp(tot_cur_up_5ohm ,"The total current through upper in 5 Ω resistor in A is");

+disp(tot_cur_low_5ohm,"The total current through lower in 5 Ω resistor in A is");

+disp(tot_cur_10ohm,"The total current through in 10 Ω resistor in A is");

diff --git a/2384/CH2/EX2.4/ex2_4.sce b/2384/CH2/EX2.4/ex2_4.sce
new file mode 100755
index 000000000..8aaf86e54
--- /dev/null
+++ b/2384/CH2/EX2.4/ex2_4.sce
@@ -0,0 +1,16 @@
+// Exa 2.4

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 5;// in ohm

+R2 = 10;// in ohm

+R3 = 7;// in ohm

+V = 20;// in V

+Vth = R2*V/(R1+R2);// in V

+Rth = R3 + ((R2*R1)/(R2+R1));// in ohm

+R_L = Rth;// in ohm

+disp(R_L,"The value of load resistance in ohm is");

+Pmax = (Vth^2)/(4*R_L);// in W

+disp(Pmax,"The magnitude of maximum power in W is");

diff --git a/2384/CH2/EX2.5/ex2_5.sce b/2384/CH2/EX2.5/ex2_5.sce
new file mode 100755
index 000000000..cf5dc9c34
--- /dev/null
+++ b/2384/CH2/EX2.5/ex2_5.sce
@@ -0,0 +1,20 @@
+// Exa 2.5

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+V1 = 12;// in V

+V2 = 10;// in V

+R1 = 6;// in ohm

+R2 = 7;// in ohm

+R3 = 4;// in ohm

+R_T = R1 + ( (R2*R3)/(R2+R3) );// in ohm

+I_T = V1/R_T;// in A

+I1 = (R2/(R2+R3))*I_T;// in A

+R_T = R2 + ( (R1*R3)/(R1+R3) );// in ohm

+I_T = V2/R_T;// in A

+I2 = (R1*I_T)/(R1+R3);// in A

+// current across 4 ohm resistor 

+I = I1+I2;// in A

+disp(I,"The current across 4 ohm resistor in A is");

diff --git a/2384/CH2/EX2.6/ex2_6.sce b/2384/CH2/EX2.6/ex2_6.sce
new file mode 100755
index 000000000..9969329d9
--- /dev/null
+++ b/2384/CH2/EX2.6/ex2_6.sce
@@ -0,0 +1,23 @@
+// Exa 2.6

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 2;// in ohm

+R2 = 3;// in ohm

+R3 = 1;// in ohm

+R4= 2;// in ohm

+V1 = 4.2;// in V

+V2 = 3.5;// in V

+R_T =R1+R3+R2*R4/(R2+R4);// in ohm

+I_T = V1/R_T;// in A

+I1 = (R1/(R1+R2))*I_T;// in A

+R = R1+R3;// in ohm

+R_desh = (R*R2)/(R+R2);// in ohm

+R_T = R_desh+R1;// in ohm

+I_T = V2/R_T;// in A

+I2 = (R2/(R2+R))*I_T;// in A

+// current in the branch AB 

+I = I2-I1;// in A

+disp(I,"The current in the branch AB of the circuit in A is");

diff --git a/2384/CH2/EX2.7/ex2_7.sce b/2384/CH2/EX2.7/ex2_7.sce
new file mode 100755
index 000000000..6947ec3cf
--- /dev/null
+++ b/2384/CH2/EX2.7/ex2_7.sce
@@ -0,0 +1,17 @@
+// Exa 2.7

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 2;// in ohm

+R2 = 4;// in ohm

+R3 = 8;// in ohm

+Ig = 2;// in A

+V = 20;// in V

+R_T = R1+R3;// in ohm

+I1 = V/R_T;// in A

+I2 = (R1/(R1+R3))*Ig;// in A

+// current through in 8 ohm resistor 

+I = I1-I2;// in A

+disp(I,"The current through in 8 ohm resistor in A is");

diff --git a/2384/CH2/EX2.8/ex2_8.sce b/2384/CH2/EX2.8/ex2_8.sce
new file mode 100755
index 000000000..8cc0b2cdc
--- /dev/null
+++ b/2384/CH2/EX2.8/ex2_8.sce
@@ -0,0 +1,19 @@
+// Exa 2.8

+clc;

+clear;

+close;

+format('v',7)

+// Given data

+R1 = 4;// in ohm

+R2 = 24;// in ohm

+R_L = 16;// in ohm

+V1 = 20;// in V

+V2 = 30;// in V

+// V1-R1*I-R2*I-V2 = 0;

+I= (V1-V2)/(R1+R2)

+// V1-R1*I-Vth = 0;

+Vth = V1-R1*I;// in V

+Rth = (R1*R2)/(R1+R2);// in ohm

+// current through 16 ohm resistor 

+I_L = Vth/(Rth+R_L);// in A

+disp(I_L,"The current through 16 ohm resistor in A is");

diff --git a/2384/CH2/EX2.9/ex2_9.sce b/2384/CH2/EX2.9/ex2_9.sce
new file mode 100755
index 000000000..16804bbcb
--- /dev/null
+++ b/2384/CH2/EX2.9/ex2_9.sce
@@ -0,0 +1,20 @@
+// Exa 2.9

+clc;

+clear;

+close;

+format('v',5)

+// Given data

+R1 = 6;// in ohm

+R2 = 4;// in ohm

+R3 = 3;// in ohm

+R_L = 6;// in ohm

+V1 = 6;// in V

+V2 = 15;// in V

+// V1 - R1*I - R3*I -V2 = 0

+I= (V1-V2)/(R1+R3);

+// Vth - R3*I -V2 = 0;

+Vth =V2+R3*I;// in V

+Rth = ((R1*R3)/(R1+R3)) + R2;// in ohm

+// current through 6 ohm resistance 

+I_L = Vth/(Rth+R_L);// in A

+disp(I_L,"The current through 6 ohm resistance in A is");