initial commit / add all books

8 files changed, 119 insertions, 0 deletions

diff --git a/1958/CH13/EX13.1/Chapter13_example1.sce b/1958/CH13/EX13.1/Chapter13_example1.sce
new file mode 100755
index 000000000..c6bf8518f
--- /dev/null
+++ b/1958/CH13/EX13.1/Chapter13_example1.sce
@@ -0,0 +1,13 @@
+clc

+clear

+//Input data

+Vm=100//Maximum voltage in V

+R=50//resitance in ohms

+

+//Calculations

+Vrms=(Vm/sqrt(2))//rms voltage in V

+Irms=(Vrms/R)//rms current in A

+Im=(Vm/R)//Maximum current in A

+

+//Output

+printf('rms current is %3.2f A and maximum current is %i A',Irms,Im)

diff --git a/1958/CH13/EX13.2/Chapter13_example2.sce b/1958/CH13/EX13.2/Chapter13_example2.sce
new file mode 100755
index 000000000..24c0792b1
--- /dev/null
+++ b/1958/CH13/EX13.2/Chapter13_example2.sce
@@ -0,0 +1,14 @@
+clc

+clear

+//Input data

+c=50//Capacitor in micro F

+Vm=220//Maximum voltage in V

+f=50//Frequency in Hz

+

+//Calculations

+Xc=(1/(2*3.14*c*10^-6*f))//Reactance in ohms

+I=(Vm/Xc)//Maximum current in A 

+Irms=I/sqrt(2)//rms current in A

+

+//Output

+printf('rms current is %3.2f A',Irms)

diff --git a/1958/CH13/EX13.3/Chapter13_example3.sce b/1958/CH13/EX13.3/Chapter13_example3.sce
new file mode 100755
index 000000000..143129329
--- /dev/null
+++ b/1958/CH13/EX13.3/Chapter13_example3.sce
@@ -0,0 +1,13 @@
+clc

+clear

+//Input data

+L=2//Inductance in H

+Vrms=220//rms voltage in V

+f=50//Frequency in Hz

+

+//Calculations

+Xl=(2*3.14*f*L)//Reactance in ohms

+Irms=(Vrms/Xl)//rms current in A

+

+//Output

+printf('rms current is %3.3f A',Irms)

diff --git a/1958/CH13/EX13.4/Chapter13_example4.sce b/1958/CH13/EX13.4/Chapter13_example4.sce
new file mode 100755
index 000000000..7ddbf515e
--- /dev/null
+++ b/1958/CH13/EX13.4/Chapter13_example4.sce
@@ -0,0 +1,15 @@
+clc

+clear

+//Input data

+Vm=220//Maximum voltage in V

+f=50//frequency in Hz

+R=2000//Resistance in ohms

+C=5*10^-6//Capacitor in F

+

+//Calculations

+Xc=(1/(2*3.14*f*C))//Reactance in ohms

+Z=sqrt(R^2+Xc^2)//Impedence in ohm

+Vc=(Vm*Xc)/Z//Maximum potential difference across the capacitor in V

+

+//Output

+printf('Maximum potential difference across the capacitor is %3.2f V',Vc)

diff --git a/1958/CH13/EX13.5/Chapter13_example5.sce b/1958/CH13/EX13.5/Chapter13_example5.sce
new file mode 100755
index 000000000..d7fb4906d
--- /dev/null
+++ b/1958/CH13/EX13.5/Chapter13_example5.sce
@@ -0,0 +1,15 @@
+clc

+clear

+//Input data

+R=5000//Resistance in ohms

+L=2//Inductance in H

+Vrms=200//rms Voltage in V

+f=50//Frequency in Hz

+

+//Calculations

+Xl=(2*3.14*f*L)//Inductive reactance in ohms

+Z=sqrt(R^2+Xl^2)//Impedence in ohms

+Vl=(Vrms*Xl)/Z//rms potential difference across the inductor in V

+

+//Output

+printf('rms potential difference across the inductor is %3.2f V',Vl)

diff --git a/1958/CH13/EX13.6/Chapter13_example6.sce b/1958/CH13/EX13.6/Chapter13_example6.sce
new file mode 100755
index 000000000..9f6825f95
--- /dev/null
+++ b/1958/CH13/EX13.6/Chapter13_example6.sce
@@ -0,0 +1,21 @@
+clc

+clear

+//Input data

+R=10//Resistance in ohms

+L=5*10^-3//Inductance in H

+C=10*10^-6//Capacitance in F

+V=100//Voltage in V

+f=50//Frequency in Hz

+

+//Calculations

+Xc=(1/(2*3.14*f*C))//Capacitive reactance in ohms

+Xl=(2*3.14*f*L)//Inductive reactance in ohms

+Z=sqrt(R^2+(Xl-Xc)^2)//Impedence in ohms

+I=(V/Z)//Current in A

+q=atand((Xl-Xc)/R)//Phase angle in degrees

+Vr=(I*R)//Voltage across resistor in V

+Vc=(I*Xc)//Voltage across capacitor in V

+Vl=(I*Xl)//Voltage across inductor in V

+

+//Output

+printf('Total impedence is %3.1f ohms \n Current is %3.3f A \n Phase angle is %3.2f degrees \n Voltage across resistor is %3.2f V \n Voltage across capacitor is %3.2f V \n Voltage across inductor is %3.3f V',Z,I,q,Vr,Vc,Vl)

diff --git a/1958/CH13/EX13.7/Chapter13_example7.sce b/1958/CH13/EX13.7/Chapter13_example7.sce
new file mode 100755
index 000000000..89233ade8
--- /dev/null
+++ b/1958/CH13/EX13.7/Chapter13_example7.sce
@@ -0,0 +1,15 @@
+clc

+clear

+//Input data

+R=5//Resistance in ohms

+L=2*10^-3//Inductance in H

+C=25*10^-6//Capacitance in F

+V=50//Voltage in V

+

+//Calculations

+w=1/sqrt(L*C)//Angular speed in rad/s

+f=(w/(2*3.14))//Frequency in Hz

+Q=(w*L)/R//Q factor

+

+//Output

+printf('Resonating frequency is %3.2f Hz \n Q factor is %3.2f',f,Q)

diff --git a/1958/CH13/EX13.8/Chapter13_example8.sce b/1958/CH13/EX13.8/Chapter13_example8.sce
new file mode 100755
index 000000000..24512ac0f
--- /dev/null
+++ b/1958/CH13/EX13.8/Chapter13_example8.sce
@@ -0,0 +1,13 @@
+clc

+clear

+//Input data

+L=(20*10^-3)//Inductance in H

+Q=8//Q factor

+f=1000//Frequency in Hz

+

+//Calculations

+R=(2*3.14*f*L)/Q//Resistance in ohms

+C=(1/((2*3.14*f)^2*L))/10^-6//Capacitance in microF

+

+//Output

+printf('Capacitance and resistance of coil is %3.2f micro F and %3.1f ohms respectively',C,R)