summaryrefslogtreecommitdiff
path: root/608/CH33
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /608/CH33
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '608/CH33')
-rwxr-xr-x608/CH33/EX33.01/33_01.sce35
-rwxr-xr-x608/CH33/EX33.02/33_02.sce28
-rwxr-xr-x608/CH33/EX33.03/33_03.sce30
-rwxr-xr-x608/CH33/EX33.04/33_04.sce29
-rwxr-xr-x608/CH33/EX33.05/33_05.sce30
-rwxr-xr-x608/CH33/EX33.06/33_06.sce31
-rwxr-xr-x608/CH33/EX33.07/33_07.sce34
-rwxr-xr-x608/CH33/EX33.08/33_08.sce41
-rwxr-xr-x608/CH33/EX33.09/33_09.sce22
-rwxr-xr-x608/CH33/EX33.10/33_10.sce23
-rwxr-xr-x608/CH33/EX33.11/33_11.sce22
-rwxr-xr-x608/CH33/EX33.12/33_12.sce31
-rwxr-xr-x608/CH33/EX33.13/33_13.sce42
-rwxr-xr-x608/CH33/EX33.15/33_15.sce32
-rwxr-xr-x608/CH33/EX33.16/33_16.sce44
-rwxr-xr-x608/CH33/EX33.17/33_17.sce26
16 files changed, 500 insertions, 0 deletions
diff --git a/608/CH33/EX33.01/33_01.sce b/608/CH33/EX33.01/33_01.sce
new file mode 100755
index 000000000..eb83d2bb4
--- /dev/null
+++ b/608/CH33/EX33.01/33_01.sce
@@ -0,0 +1,35 @@
+//Problem 33.01: For the circuit shown in Figure 33.12, use Th´evenin’s theorem to determine (a) the current flowing in the capacitor, and (b) the p.d. across the 150 kohm resistor.
+
+//initializing the variables:
+rv = 200; // in volts
+thetav = 0; // in degrees
+R1 = 5000; // in ohm
+R2 = 20000; // in ohm
+R3 = -1*%i*120000; // in ohm
+R4 = 150000; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//Initially the (150-i120)kohm impedance is removed from the circuit as shown in Figure 33.13.
+//Note that, to find the current in the capacitor, only the capacitor need have been initially removed from the circuit. However, removing each of the components from the branch through which the current is required will often result in a simpler solution.
+//From Figure 33.13,
+//current, I1
+I1 = V/(R1 + R2)
+//The open-circuit e.m.f. E is equal to the p.d. across the 20 kohm resistor, i.e.
+E = I1*R2
+//Removing the V1 source gives the network shown in Figure 33.14.
+//The impedance, z, ‘looking in’ at the open-circuited terminals is given by
+z = R1*R2/(R1 + R2)
+//The Th´evenin equivalent circuit is shown in Figure 33.15, where current iL is given by
+ZL = R3 + R4
+IL = E/(ZL + z)
+ILmag = (real(IL)^2 + imag(IL)^2)^0.5
+//current flowing in the capacitor
+Ic = ILmag
+//P.d. across the 150 kohm resistor,
+Vr150 = ILmag*R4
+
+printf("\n\n Result \n\n")
+printf("\n(a)the current flowing in the capacitor is %.1E A",Ic)
+printf("\n(b) the p.d. across the 150 ohm resistance is %.0f V",Vr150) \ No newline at end of file
diff --git a/608/CH33/EX33.02/33_02.sce b/608/CH33/EX33.02/33_02.sce
new file mode 100755
index 000000000..7742fc3cc
--- /dev/null
+++ b/608/CH33/EX33.02/33_02.sce
@@ -0,0 +1,28 @@
+//Problem 33.02: Determine, for the network shown in Figure 33.16, the value of current I. Each of the voltage sources has a frequency of 2 kHz.
+
+//initializing the variables:
+V1 = 20; // in volts
+V2 = 10; // in volts
+R1 = 2; // in ohm
+R2 = 1.5; // in ohm
+L = 235E-6; // in Henry
+R4 = 3; // in ohm
+f = 2000; // in Hz
+
+//calculation:
+//The impedance through which current I is flowing is initially removed from the network, as shown in Figure 33.17.
+//From Figure 33.17,
+//current, I1
+I1 = (V1 - V2)/(R1 + R4)
+//the open circuit e.m.f. E
+E = V1 - I1*R1
+//When the sources of e.m.f. are removed from the circuit, the impedance, z, ‘looking in’ at the break is given by
+z = R1*R4/(R1 + R4)
+//The Th´evenin equivalent circuit is shown in Figure 33.18, where inductive reactance,
+XL = 2*%pi*f*L
+R3 = %i*XL
+//Hence current
+I = E/(R2 + R3 + z)
+
+printf("\n\n Result \n\n")
+printf("\n the current I is %.2f + (%.2f)i A",real(I), imag(I)) \ No newline at end of file
diff --git a/608/CH33/EX33.03/33_03.sce b/608/CH33/EX33.03/33_03.sce
new file mode 100755
index 000000000..e0004c896
--- /dev/null
+++ b/608/CH33/EX33.03/33_03.sce
@@ -0,0 +1,30 @@
+//Problem 33.03: Use Th´evenin’s theorem to determine the power dissipated in the 48 ohm resistor of the network shown in Figure 33.19
+
+//initializing the variables:
+rv = 50; // in volts
+thetav = 0; // in degrees
+R1 = -1*%i*400; // in ohm
+R2 = 300; // in ohm
+R3 = %i*144; // in ohm
+R4 = 48; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//The R3 and R4 impedance is initially removed from the network as shown in Figure 33.20.
+//From Figure 33.20,
+//current, I
+i = V/(R1 + R2)
+//the open circuit e.m.f. E
+E = i*R2
+//When the V is removed from the circuit, the impedance, z, ‘looking in’ at the break is given by
+z = R1*R2/(R1 + R2)
+//The Th´evenin equivalent circuit is shown in Figure 33.21 connected to R# and R4,
+//Hence current
+I = E/(R4 + R3 + z)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+//the power dissipated in the 48 ohm resistor
+Pr48 = R4*Imag^2
+
+printf("\n\n Result \n\n")
+printf("\n the power dissipated in the 48 ohm resistor is %.2f W",Pr48) \ No newline at end of file
diff --git a/608/CH33/EX33.04/33_04.sce b/608/CH33/EX33.04/33_04.sce
new file mode 100755
index 000000000..a6209a296
--- /dev/null
+++ b/608/CH33/EX33.04/33_04.sce
@@ -0,0 +1,29 @@
+//Problem 33.04:For the network shown in Figure 33.22, use Th´evenin’s theorem to determine the current flowing in the 80 ohm resistor.
+
+//initializing the variables:
+V = 100; // in volts
+R1 = 5; // in ohm
+R2 = 20; // in ohm
+R3 = 46; // in ohm
+R4 = 50; // in ohm
+R5 = 15; // in ohm
+R6 = 60; // in ohm
+R7 = 16; // in ohm
+R8 = 80; // in ohm
+
+//calculation:
+//One method of analysing a multi-branch network as shown in Figure 33.22 is to use Th´evenin’s theorem on one part of the network at a time. For example, the part of the circuit to the left of AA may be reduced to a Th´evenin equivalent circuit.
+//From Figure 33.23,
+E1 = (R2/(R1 + R2))*V
+z1 = R1*R2/(R1 + R2)
+//Thus the network of Figure 33.22 reduces to that of Figure 33.24. The part of the network shown in Figure 33.24 to the left of BB may be reduced to a Th´evenin equivalent circuit, where
+E2 = (R4/(R3 + R4 + z1))*E1
+z2 = R4*(z1 + R3)/(R4 + z1 + R3)
+//Thus the original network reduces to that shown in Figure 33.25. The part of the network shown in Figure 33.25 to the left of CC may be reduced to a Th´evenin equivalent circuit, where
+E3 = (R6/(R5 + R6 + z2))*E2
+z3 = R6*(z2 + R5)/(R5 + z2 + R6)
+//Thus the original network reduces to that of Figure 33.26, from which the current in the 80 ohm resistor is given by
+I = E3/(z3 + R7 + R8)
+
+printf("\n\n Result \n\n")
+printf("\n the current flowing in the 80 ohm resistor is %.2f A",I) \ No newline at end of file
diff --git a/608/CH33/EX33.05/33_05.sce b/608/CH33/EX33.05/33_05.sce
new file mode 100755
index 000000000..8d8e86489
--- /dev/null
+++ b/608/CH33/EX33.05/33_05.sce
@@ -0,0 +1,30 @@
+//Problem 33.05:Determine the Th´evenin equivalent circuit with respect to terminals AB of the circuit shown in Figure 33.27. Hence determine (a) the magnitude of the current flowing in a (3.75 + i11) ohm impedance connected across terminals AB, and (b) the magnitude of the p.d. across the( 3.75 + i11)ohm impedance.
+
+//initializing the variables:
+rv = 24; // in volts
+thetav = 0; // in degrees
+R1 = -1*%i*3; // in ohm
+R2 = 4; // in ohm
+R3 = %i*3; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//Current I1 shown in Figure 33.27 is given by
+I1 = V/(R1 + R2 + R3)
+//The Th´evenin equivalent voltage, i.e., the open-circuit voltage across terminals AB, is given by
+E = I1*(R2 + R3)
+//When the voltage source is removed, the impedance z ‘looking in’ at AB is given by
+z = (R2 + R3)*R1/(R1 + R2 + R3)
+//Thus the Th´evenin equivalent circuit is as shown in Figure 33.28.
+//when (3.75 + i11) ohm impedance connected across terminals AB, the current I flowing in the impedance is given by
+R = 3.75 + %i*11; // in ohms
+I = E/(R + z)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+//the p.d. across the( 3.75 + i11)ohm impedance.
+VR = I*R
+VRmag = (real(VR)^2 + imag(VR)^2)^0.5
+
+printf("\n\n Result \n\n")
+printf("\n (a) the current I flowing in the (3.75 + i11) impedance is given by is %.0f A",Imag)
+printf("\n (b) the magnitude of the p.d. across the impedance is %.1f V",VRmag) \ No newline at end of file
diff --git a/608/CH33/EX33.06/33_06.sce b/608/CH33/EX33.06/33_06.sce
new file mode 100755
index 000000000..8e3938d9b
--- /dev/null
+++ b/608/CH33/EX33.06/33_06.sce
@@ -0,0 +1,31 @@
+//Problem 33.06: Use Th´evenin’s theorem to determine the current flowing in the capacitor of the network shown in Figure 33.29.
+
+//initializing the variables:
+rv = 16.55; // in volts
+thetav = -22.62; // in degrees
+R1 = 4; // in ohm
+R2 = %i*2; // in ohm
+R3 = %i*6; // in ohm
+R4 = 3; // in ohm
+R5 = 5; // in ohm
+R6 = -1*%i*8; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//The capacitor is removed from branch AB, as shown in Figure 33.30.
+//Impedance, Z
+Z1 = R3 + R4 + R5
+Z = R1 + (Z1*R2/(R2 + Z1))
+I1 = V/Z
+I2 = (R2/(R2 +Z1))*I1
+//The open-circuit voltage, E
+E = I2*R5
+//If the voltage source is removed from Figure 33.30, the impedance, z, ‘looking in’ at AB is given by
+z = R5*((R1*R2/(R1 + R2)) + R3 + R4)/(R5 + ((R1*R2/(R1 + R2)) + R3 + R4))
+//The Th´evenin equivalent circuit is shown in Figure 33.31, where the current flowing in the capacitor, I, is given by
+I = E/(z + R6)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+phiid = (atan(imag(I)/real(I)))*180/%pi
+printf("\n\n Result \n\n")
+printf("\n the current flowing in the capacitor of the network is %.2f/_%.2f° A",Imag,phiid) \ No newline at end of file
diff --git a/608/CH33/EX33.07/33_07.sce b/608/CH33/EX33.07/33_07.sce
new file mode 100755
index 000000000..e9eb93988
--- /dev/null
+++ b/608/CH33/EX33.07/33_07.sce
@@ -0,0 +1,34 @@
+//Problem 33.07: For the network shown in Figure 33.32, derive the Th´evenin equivalent circuit with respect to terminals PQ, and hence determine the power dissipated by a 2 ohm resistor connected across PQ.
+
+//initializing the variables:
+rv1 = 5; // in volts
+rv2 = 10; // in volts
+thetav1 = 45; // in degrees
+thetav2 = 0; // in degrees
+R1 = 8; // in ohm
+R2 = 5; // in ohm
+R3 = %i*3; // in ohm
+R4 = 4; // in ohm
+
+//calculation:
+//voltage
+V1 = rv1*cos(thetav1*%pi/180) + %i*rv1*sin(thetav1*%pi/180)
+V2 = rv2*cos(thetav2*%pi/180) + %i*rv2*sin(thetav2*%pi/180)
+//Current I1 shown in Figure 33.32 is given by
+I1 = V2/(R2 + R3 + R4)
+//Hence the voltage drop across the 5 ohm resistor is given by VX is in the direction shown in Figure 33.32,
+Vx = I1*R2
+//The open-circuit voltage E across PQ is the phasor sum of V1, Vx and V2, as shown in Figure 33.33.
+E = V2 - V1 - Vx
+//The impedance, z, ‘looking in’ at terminals PQ with the voltage sources removed is given by
+z = R1 + R2*(R3 + R4)/(R2 + R3 + R4)
+//The Th´evenin equivalent circuit is shown in Figure 33.34 with the 2 ohm resistance connected across terminals PQ.
+//The current flowing in the 2 ohm resistance is given by
+R = 2; // in ohms
+I = E/(z + R)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+//power P dissipated in the 2 ohm resistor is given by
+Pr2 = R*Imag^2
+
+printf("\n\n Result \n\n")
+printf("\n power P dissipated in the 2 ohm resistor is %.4f W",Pr2) \ No newline at end of file
diff --git a/608/CH33/EX33.08/33_08.sce b/608/CH33/EX33.08/33_08.sce
new file mode 100755
index 000000000..0669f2cb5
--- /dev/null
+++ b/608/CH33/EX33.08/33_08.sce
@@ -0,0 +1,41 @@
+//Problem 33.08: For the a.c. bridge network shown in Figure 33.35, determine the current flowing in the capacitor, and its direction, by using Th´evenin’s theorem. Assume the 306/_0° V source to have negligible internal impedance.
+
+//initializing the variables:
+rv = 30; // in volts
+thetav = 0; // in degrees
+R1 = 15; // in ohm
+R2 = 40; // in ohm
+R3 = %i*20; // in ohm
+R4 = 20; // in ohm
+R5 = %i*5; // in ohm
+R6 = 5; // in ohm
+R7 = -1*%i*25; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//The R7 is initially removed from the network, as shown in Figure 33.36
+Z1 = R1
+Z2 = R2
+Z3 = R3 + R4
+Z4 = R5 + R6
+//P.d. between A and C,
+Vac = (Z1/(Z1 + Z4))*V
+//P.d. between B and C,
+Vbc = (Z2/(Z2 + Z3))*V
+//Assuming that point A is at a higher potential than point B, then the p.d. between A and B is
+Vab = Vac - Vbc
+//the open-circuit voltage across AB is given by
+E = Vab
+//Point C is at a potential of V . Between C and A is a volt drop of Vac. Hence the voltage at point A is
+Va = V - Vac
+//Between points C and B is a voltage drop of Vbc. Hence the voltage at point B
+Vb = V - Vbc
+//Replacing the V source with a short-circuit (i.e., zero internal impedance) gives the network shown in Figure 33.37(a). The network is shown redrawn in Figure 33.37(b) and simplified in Figure 33.37(c). Hence the impedance, z, ‘looking in’ at terminals AB is given by
+z = Z1*Z4/(Z1 + Z4) + Z2*Z3/(Z2 + Z3)
+//The Th´evenin equivalent circuit is shown in Figure 33.38, where current I is given by
+I = E/(z + R7)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+
+printf("\n\n Result \n\n")
+printf("\n the current flowing in the capacitor is %.3f A in direction from B to A.",Imag) \ No newline at end of file
diff --git a/608/CH33/EX33.09/33_09.sce b/608/CH33/EX33.09/33_09.sce
new file mode 100755
index 000000000..5c0f8ac60
--- /dev/null
+++ b/608/CH33/EX33.09/33_09.sce
@@ -0,0 +1,22 @@
+//Problem 33.09: Use Norton’s theorem to determine the value of current I in the circuit shown in Figure 33.47.
+
+//initializing the variables:
+V = 5; // in volts
+R1 = 2; // in ohm
+R2 = 3; // in ohm
+R3 = -1*%i*3; // in ohm
+R4 = 2.8; // in ohm
+
+//calculation:
+//The branch containing the R4 is short-circuited, as shown in Figure 33.48.
+//The R2 in parallel with a short-circuit is the same as R2 in parallel with 0 ohm giving an equivalent impedance of
+Z1 = R2*0/(R3 + 0)
+//Hence the network reduces to that shown in Figure 33.49, where
+Isc = V/R1
+//If the Voltage source is removed from the network the input impedance, z, ‘looking-in’ at a break made in AB of Figure 33.48 gives
+z = R1*R2/(R1 + R2)
+//The Norton equivalent network is shown in Figure 33.51, where current I is given by
+I = (z/(z + R4 + R3))*Isc
+
+printf("\n\n Result \n\n")
+printf("\n the current flowing in the capacitor is %.2f + (%.2f)i A",real(I), imag(I)) \ No newline at end of file
diff --git a/608/CH33/EX33.10/33_10.sce b/608/CH33/EX33.10/33_10.sce
new file mode 100755
index 000000000..4f942091c
--- /dev/null
+++ b/608/CH33/EX33.10/33_10.sce
@@ -0,0 +1,23 @@
+//Problem 33.10: For the circuit shown in Figure 33.52 determine the current flowing in the inductive branch by using Norton’s theorem.
+
+//initializing the variables:
+V1 = 20; // in volts
+V2 = 10; // in volts
+R1 = 2; // in ohm
+R2 = 1.5; // in ohm
+R3 = %i*2.95; // in ohm
+R4 = 3; // in ohm
+
+//calculation:
+//The inductive branch is initially short-circuited, as shown in Figure 33.53.
+//From Figure 33.53,
+I1 = V1/R1
+I2 = V2/R4
+Isc = I1 + I2
+//If the voltage sources are removed, the impedance, z, ‘looking in’ at a break made in AB is given by
+z = R1*R4/(R1 + R4)
+//The Norton equivalent network is shown in Figure 33.54, where current I is given by
+I = (z/(z + R2 + R3))*Isc
+
+printf("\n\n Result \n\n")
+printf("\n the current flowing in the inductive branch is %.2f + (%.2f)i A",real(I), imag(I)) \ No newline at end of file
diff --git a/608/CH33/EX33.11/33_11.sce b/608/CH33/EX33.11/33_11.sce
new file mode 100755
index 000000000..1f1050fb3
--- /dev/null
+++ b/608/CH33/EX33.11/33_11.sce
@@ -0,0 +1,22 @@
+//Problem 33.11: Use Norton’s theorem to determine the magnitude of the p.d. across the 1 ohm resistance of the network shown in Figure 33.55.
+
+//initializing the variables:
+V = 10; // in volts
+R1 = 4; // in ohm
+R2 = 4; // in ohm
+R3 = -1*%i*2; // in ohm
+R4 = 1; // in ohm
+
+//calculation:
+//The branch containing the R4 is initially short-circuited, as shown in Figure 33.56.
+//R2 in parallel with R3 in parallel with 0 ohm (i.e., the short-circuit) is equivalent 0 ohm giving the equivalent circuit of Figure 33.57. Hence Isc
+Isc = V/R1
+//The voltage source is removed from the network of Figure 33.55, as shown in Figure 33.58, and the impedance z, ‘looking in’ at a break made in AB is given by
+z = 1/(1/R1 + 1/R2 + 1/R3)
+//The Norton equivalent network is shown in Figure 33.59, from which current I is given by
+I = (z/(z + R4))*Isc
+Imag = (real(I)^2 + imag(I)^2)^0.5
+Vr1 = Imag*R4
+
+printf("\n\n Result \n\n")
+printf("\n the magnitude of the p.d. across the 1 ohm resistor is %.2f V", Vr1) \ No newline at end of file
diff --git a/608/CH33/EX33.12/33_12.sce b/608/CH33/EX33.12/33_12.sce
new file mode 100755
index 000000000..fbeff8302
--- /dev/null
+++ b/608/CH33/EX33.12/33_12.sce
@@ -0,0 +1,31 @@
+//Problem 33.12:For the network shown in Figure 33.60, obtain the Norton equivalent network at terminals AB. Hence determine the power dissipated in a 5 ohm resistor connected between A and B.
+
+//initializing the variables:
+rv = 20; // in volts
+thetav = 0; // in degrees
+R1 = 2; // in ohm
+R2 = 4; // in ohm
+R3 = %i*3; // in ohm
+R4 = -1*%i*3; // in ohm
+
+//calculation:
+//voltage
+V = rv*cos(thetav*%pi/180) + %i*rv*sin(thetav*%pi/180)
+//Terminals AB are initially short-circuited, as shown in Figure 33.61.
+//The circuit impedance Z presented to the voltage source is given by
+Z = R1 + R4*(R2 + R3)/(R2 + R3 + R4)
+//Thus current I in Figure 33.61 is given by
+I = V/Z
+Isc = ((R2 + R3)/(R2 + R3 + R4))*I
+//Removing the voltage source of Figure 33.60 gives the network Figure 33.62 of Figure 33.62. Impedance, z, ‘looking in’ at terminals AB is given by
+z = R4 + R1*(R2 + R3)/(R2 + R3 + R1)
+//The Norton equivalent network is shown in Figure 33.63.
+R = 5; // in ohms
+//Current IL
+IL = (z/(z + R))*Isc
+ILmag = (real(IL)^2 + imag(IL)^2)^0.5
+//the power dissipated in the 5 ohm resistor is
+Pr5 = R*ILmag^2
+
+printf("\n\n Result \n\n")
+printf("\n the power dissipated in the 5 ohm resistor is %.2f W", Pr5) \ No newline at end of file
diff --git a/608/CH33/EX33.13/33_13.sce b/608/CH33/EX33.13/33_13.sce
new file mode 100755
index 000000000..4980e3f92
--- /dev/null
+++ b/608/CH33/EX33.13/33_13.sce
@@ -0,0 +1,42 @@
+//Problem 33.13:Derive the Norton equivalent network with respect to terminals PQ for the network shown in Figure 33.64 and hence determine the magnitude of the current flowing in a 2 ohm resistor connected across PQ.
+
+//initializing the variables:
+rv1 = 5; // in volts
+rv2 = 10; // in volts
+thetav1 = 45; // in degrees
+thetav2 = 0; // in degrees
+R1 = 8; // in ohm
+R2 = 5; // in ohm
+R3 = %i*3; // in ohm
+R4 = 4; // in ohm
+
+//calculation:
+//voltage
+V1 = rv1*cos(thetav1*%pi/180) + %i*rv1*sin(thetav1*%pi/180)
+V2 = rv2*cos(thetav2*%pi/180) + %i*rv2*sin(thetav2*%pi/180)
+//Terminals PQ are initially short-circuited, as shown in Figure 33.65.
+//Currents I1 and I2 are shown labelled. Kirchhoff’s laws are used.
+//For loop ABCD, and moving anticlockwise,
+//I1*(R2 + R3 + R4) + I2*(R3 + R4) = V2
+//For loop DPQC, and moving clockwise,
+//R2*I1 - R1*I2 = V2 - V1
+//Solving Equations by using determinants gives
+d1 = [V2 (R3 + R4); (V2 - V1) -1*R1]
+D1 = det(d1)
+d2 = [(R2 + R3 + R4) V2; R2 (V2 - V1)]
+D2 = det(d2)
+d = [(R2 + R3 + R4) (R3 + R4); R2 -1*R1]
+D = det(d)
+I1 = D1/D
+I2 = D2/D
+//the short-circuit current Isc
+Isc = I2
+//The impedance, z, ‘looking in’ at a break made between P and Q is given by
+z = R1 + R2*(R3 + R4)/(R2 + R3 + R4)
+//The Norton equivalent circuit is shown in Figure 33.66, where current I is given by
+R = 2; //in ohm
+I = (z/(z + R))*Isc
+Imag = (real(I)^2 + imag(I)^2)^0.5
+
+printf("\n\n Result \n\n")
+printf("\n the magnitude of the current flowing 5 ohm resistor is %.2f A", Imag) \ No newline at end of file
diff --git a/608/CH33/EX33.15/33_15.sce b/608/CH33/EX33.15/33_15.sce
new file mode 100755
index 000000000..c6cc546c0
--- /dev/null
+++ b/608/CH33/EX33.15/33_15.sce
@@ -0,0 +1,32 @@
+//Problem 33.15: (a) Convert the circuit to the left of terminals AB in Figure 33.72 to an equivalent Th´evenin circuit by initially converting to a Norton equivalent circuit. (b) Determine the magnitude of the current flowing in the (1.8+i4) ohm impedance connected between terminals A and B of Figure 33.72.
+
+//initializing the variables:
+E1 = 12; // in volts
+E2 = 24; // in volts
+Z1 = 3; // in ohm
+Z2 = 2; // in ohm
+R1 = %i*4; // in ohm
+R2 = 1.8; // in ohm
+
+//calculation:
+Z3 = R1 + R2
+//For the branch containing the E1 source, conversion to a Norton equivalent network gives
+Isc1 = E1/Z1
+//For the branch containing the E2 source, conversion to a Norton equivalent circuit gives
+Isc2 = E2/Z2
+//Thus Figure 33.73 shows a network equivalent to Figure 33.72. From Figure 33.73, the total short-circuit current
+Isc = Isc1 + Isc2
+//the total impedance is given by
+z = Z1*Z2/(Z1 + Z2)
+//Thus Figure 33.73 simplifies to Figure 33.74.
+//The open-circuit voltage across AB of Figure 33.74, E
+E = Isc*z
+//the impedance ‘looking in’ at AB,is z
+//the Th´evenin equivalent circuit is as shown in Figure 33.75.
+R = 1.8 + %i*4; // in ohm
+//when R impedance is connected to terminals AB of Figure 33.75, the current I flowing is given by
+I = E/(z + R)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+
+printf("\n\n Result \n\n")
+printf("\n the magnitude of the current flowing (1.8 + i4) ohm resistor is %.2f A", Imag) \ No newline at end of file
diff --git a/608/CH33/EX33.16/33_16.sce b/608/CH33/EX33.16/33_16.sce
new file mode 100755
index 000000000..2165d8bfb
--- /dev/null
+++ b/608/CH33/EX33.16/33_16.sce
@@ -0,0 +1,44 @@
+//Problem 33.16: Determine, by successive conversions between Th´evenin’s and Norton’s equivalent networks, a Th´evenin equivalent circuit for terminals AB of Figure 33.76. Hence determine the magnitude of the current flowing in the capacitive branch connected to terminals AB.
+
+//initializing the variables:
+V1 = 5; // in volts
+V2 = 10; // in volts
+i = 0.001; // in Amperes
+R1 = 1000; // in ohm
+R2 = 4000; // in ohm
+R3 = 2000; // in ohm
+R4 = 200; // in ohm
+R5 = -1*%i*4000; // in ohm
+
+//calculation:
+//For the branch containing the V1 source, conversion to a Norton equivalent network gives
+Isc1 = V1/R1
+z1 = R1
+//For the branch containing the V2 source, conversion to a Norton equivalent circuit gives
+Isc2 = V2/R2
+z2 = R2
+//Thus the circuit of Figure 33.76 converts to that of Figure 33.77.
+//The above two Norton equivalent networks shown in Figure 33.77 may be combined, since the total short-circuit current is
+Isc = Isc1 + Isc2
+//the total impedance is given by
+Z1 = z1*z2/(z1 + z2)
+//Both of the Norton equivalent networks shown in Figure 33.78 may be converted to Th´evenin equivalent circuits. Open-circuit voltage across CD is
+Ecd = Isc*Z1
+//the impedance ‘looking in’ at CD is Z1
+//Open-circuit voltage across EF
+Eef = i*R3
+//the impedance ‘looking in’ Figure 33.79 at EF
+Z2 = R3
+//Thus Figure 33.78 converts to Figure 33.79.
+//Combining the two Th´evenin circuits gives e.m.f.
+E = Ecd - Eef
+//impedance z
+z = Z1 + Z2
+//the Th´evenin equivalent circuit for terminals AB of Figure 33.76 is as shown in Figure 33.80.
+Z3 = R4 + R5
+//If an impedance Z3 is connected across terminals AB, then the current I flowing is given by
+I = E/(z + Z3)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+
+printf("\n\n Result \n\n")
+printf("\n the current in the capacitive branch is %.2E A", Imag) \ No newline at end of file
diff --git a/608/CH33/EX33.17/33_17.sce b/608/CH33/EX33.17/33_17.sce
new file mode 100755
index 000000000..e8de21846
--- /dev/null
+++ b/608/CH33/EX33.17/33_17.sce
@@ -0,0 +1,26 @@
+//Problem 33.17: (a) Determine an equivalent Th´evenin circuit for terminals AB of the network shown in Figure 33.81. (b) Calculate the power dissipated in a (600 - i800)ohm impedance connected between A and B of Figure 33.81.
+
+//initializing the variables:
+V = 5; // in volts
+i = 0.004; // in Amperes
+R1 = 2000; // in ohm
+R2 = %i*1000; // in ohm
+
+//calculation:
+//Converting the Th´evenin circuit to a Norton network gives
+Isc1 = V/R2
+//Thus Figure 33.81 converts to that shown in Figure 33.82. The two Norton equivalent networks may be combined, giving
+Isc = Isc1 + i
+z = R1*R2/(R1 + R2)
+//This results in the equivalent network shown in Figure 33.83. Converting to an equivalent Th´evenin circuit gives open circuit e.m.f. across AB,
+E = Isc*z
+//Thus the The´venin equivalent circuit is as shown in Figure 33.84.
+R = 600 - %i*800; // in ohms
+//When a R impedance is connected across AB, the current I flowing is given by
+I = E/(z + R)
+Imag = (real(I)^2 + imag(I)^2)^0.5
+//the power dissipated in the R resistor is
+PR = R*Imag^2
+
+printf("\n\n Result \n\n")
+printf("\n the power dissipated in the (600 - i800) ohm resistor is %.2E W", PR) \ No newline at end of file