initial commit / add all books

20 files changed, 196 insertions, 0 deletions

diff --git a/620/CH24/EX24.1/example24_1.sce b/620/CH24/EX24.1/example24_1.sce
new file mode 100644
index 000000000..1aeb85d63
--- /dev/null
+++ b/620/CH24/EX24.1/example24_1.sce
@@ -0,0 +1,17 @@
+r=100;

+f=60;

+v=120;

+vr=60;

+disp("Part a");

+vl=sqrt(v^2-vr^2);

+disp("the reading of voltmeter (in V) connected across the coil is"); disp(v1);

+disp("Part b");

+deg=atan(vl/vr)*180/%pi;

+disp("th phase angle (in deg) between the applied voltage and the current is"); disp(deg);

+disp("Part c");

+i=vr/r;

+disp("the current (in A) in the circuit is"); disp(i);

+disp("Part d");

+x_l=vl/i;

+l=x_l/(2*%pi*f);

+disp("the inductance (in H) of the coil is"); disp(l);
\ No newline at end of file
diff --git a/620/CH24/EX24.1/example24_1.txt b/620/CH24/EX24.1/example24_1.txt
new file mode 100644
index 000000000..a62cb028f
--- /dev/null
+++ b/620/CH24/EX24.1/example24_1.txt
@@ -0,0 +1,24 @@
+

+ Part a   

+ 

+ the reading of voltmeter (in V) connected across the coil is   

+ 

+    40.  

+ 

+ Part b   

+ 

+ th phase angle (in deg) between the applied voltage and the current is   

+ 

+    60.  

+ 

+ Part c   

+ 

+ the current (in A) in the circuit is   

+ 

+    0.6  

+ 

+ Part d   

+ 

+ the inductance (in H) of the coil is   

+ 

+    0.4594407  
\ No newline at end of file
diff --git a/620/CH24/EX24.10/example24_10.sce b/620/CH24/EX24.10/example24_10.sce
new file mode 100644
index 000000000..a211fd1e7
--- /dev/null
+++ b/620/CH24/EX24.10/example24_10.sce
@@ -0,0 +1,14 @@
+r=200;

+x_l=400;

+v=40;

+disp("Part a");

+ir=v/r;

+il=v/x_l;

+i=ir+il;

+disp("the total circuit current (in A) is");disp(i);

+disp("Part b");

+z=v/i;

+disp("the impedance (in Ω) of the circuit is");disp(z);

+disp("Part c");

+deg=-atan(il/ir)*180/%pi;

+disp("the phase angle(in deg) between circuit current and applied voltage is");disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.10/example24_10.txt b/620/CH24/EX24.10/example24_10.txt
new file mode 100644
index 000000000..bd0da039d
--- /dev/null
+++ b/620/CH24/EX24.10/example24_10.txt
diff --git a/620/CH24/EX24.11/example24_11.sce b/620/CH24/EX24.11/example24_11.sce
new file mode 100644
index 000000000..bf04b1129
--- /dev/null
+++ b/620/CH24/EX24.11/example24_11.sce
@@ -0,0 +1,14 @@
+r=200;

+x_c=100;

+v=40;

+disp("Part a");

+ir=v/r;

+ic=v/x_c;

+i=sqrt(ir^2+ic^2);

+disp("the total circuit current (in A) is"); disp(i);

+disp("Part b");

+z=v/i;

+disp("the impedance (in Ω) of the circuit is"); disp(z);

+disp("Part c");

+deg=atan(ic/ir)*180/%pi;

+disp("the phase angle (in deg) between the circuit current and applied voltage is"); disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.11/example24_11.txt b/620/CH24/EX24.11/example24_11.txt
new file mode 100644
index 000000000..01d468898
--- /dev/null
+++ b/620/CH24/EX24.11/example24_11.txt
diff --git a/620/CH24/EX24.12/example24_12.sce b/620/CH24/EX24.12/example24_12.sce
new file mode 100644
index 000000000..8f8336d8e
--- /dev/null
+++ b/620/CH24/EX24.12/example24_12.sce
@@ -0,0 +1,16 @@
+r=200;

+x_l=400;

+x_c=100;

+v=40;

+disp("Part a");

+ir=v/r;

+il=v/x_l;

+ic=v/x_c;

+i=sqrt(ir^2+(ic-il)^2);

+disp("the total circuit current (in A) is");disp(i);

+disp("Part b");

+z=v/i;

+disp("the impedance (in Ω) of the circuit is"); disp(z);

+disp("Part c");

+deg=atan((ic-il)/ir)*180/%pi;

+disp("the phase angle (in deg) between circuit current and applied voltage sis"); disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.12/example24_12.txt b/620/CH24/EX24.12/example24_12.txt
new file mode 100644
index 000000000..a1d3313e1
--- /dev/null
+++ b/620/CH24/EX24.12/example24_12.txt
diff --git a/620/CH24/EX24.2/example24_2.sce b/620/CH24/EX24.2/example24_2.sce
new file mode 100644
index 000000000..8810f1997
--- /dev/null
+++ b/620/CH24/EX24.2/example24_2.sce
@@ -0,0 +1,14 @@
+l=30*10^(-3);

+r=200;

+v=10;

+f=1000;

+disp("Part a");

+x_l=2*%pi*f*l;

+z=sqrt(r^2+x_l^2);

+disp("the impedance (in Ω) of the circuit is"); disp(z);

+disp("Part b");

+i=v/z;

+disp("the current (in A) in the circuit is"); disp(i);

+disp("Part c");

+deg=atan(x_l/r)*180/%pi;

+disp("the phase angle (in deg) between applied voltage and current is"); disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.2/example24_2.txt b/620/CH24/EX24.2/example24_2.txt
new file mode 100644
index 000000000..87f3093e5
--- /dev/null
+++ b/620/CH24/EX24.2/example24_2.txt
diff --git a/620/CH24/EX24.3/example24_3.sce b/620/CH24/EX24.3/example24_3.sce
new file mode 100644
index 000000000..ff4d1d8d6
--- /dev/null
+++ b/620/CH24/EX24.3/example24_3.sce
@@ -0,0 +1,25 @@
+r=10;

+f=60;

+v1=18;

+v2=0.12;

+d1=0.05;

+d2=0.01;

+disp("Part a");

+i=v2/r;

+z=v1/i;

+disp("the impedance (in Ω) of the circuit is"); disp(z);

+disp("Part b");

+deg=360*d2/d1;

+disp("the phase angle (in deg) between applied voltage and current is"); disp(deg);

+disp("Part c");

+rac=z*cos(deg*%pi/180);

+disp("the ac resistance (in Ω) of the coil is"); disp(rac);

+disp("Part d");

+x_l=z*sin(deg*%pi/180);

+disp("the inductive reactance (in Ω) of the coil is"); disp(x_l);

+disp("Part e");

+q=x_l/rac;

+disp("the Q of the coil is"); disp(q);

+disp("Part f");

+l=x_l/(2*%pi*f);

+disp("the inductance (in H) of the coil is"); disp(l);
\ No newline at end of file
diff --git a/620/CH24/EX24.3/example24_3.txt b/620/CH24/EX24.3/example24_3.txt
new file mode 100644
index 000000000..a3720606d
--- /dev/null
+++ b/620/CH24/EX24.3/example24_3.txt
diff --git a/620/CH24/EX24.4/example24_4.sce b/620/CH24/EX24.4/example24_4.sce
new file mode 100644
index 000000000..2b163b0cd
--- /dev/null
+++ b/620/CH24/EX24.4/example24_4.sce
@@ -0,0 +1,20 @@
+r=2200;

+f=60;

+i=0.015;

+vp=60;

+disp("Part a");

+vr=i*r;

+disp("the reading of voltmeter (in V) across the resistor is"); disp(vr);

+disp("Part b");

+vc=vp/(2*sqrt(2));

+disp("the r.m.s. voltage (in V) across the capacitor is"); disp(vc);

+disp("Part c");

+v=sqrt(vr^2+vc^2);

+disp("the applied voltage (in V) is"); disp(v);

+disp("Part d");

+deg=-atan(vc/vr)*180/%pi;

+disp("the phase angle (in deg) between current and applied voltage is"); disp(deg);

+disp("Part f");

+x_c=vc/i;

+c=1/(2*%pi*f*x_c);

+disp("the capacitance (in μF) is"); disp(c*10^6);
\ No newline at end of file
diff --git a/620/CH24/EX24.4/example24_4.txt b/620/CH24/EX24.4/example24_4.txt
new file mode 100644
index 000000000..47636b4e5
--- /dev/null
+++ b/620/CH24/EX24.4/example24_4.txt
diff --git a/620/CH24/EX24.5/example24_5.sce b/620/CH24/EX24.5/example24_5.sce
new file mode 100644
index 000000000..2663ac02a
--- /dev/null
+++ b/620/CH24/EX24.5/example24_5.sce
@@ -0,0 +1,12 @@
+disp("Part a");

+c=0.1*10^(-6);

+i=5*10^(-3);

+v=10;

+f=1000;

+x_c=1/(2*%pi*f*c);

+z=v/i;

+r=sqrt(z^2-x_c^2);

+disp("the resistance (in kΩ) required is"); disp(r*10^(-3));

+disp("Part b");

+deg=-atan(x_c/r)*180/%pi;

+disp("the phase angle (in deg) between applied voltage and current is"); disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.5/example24_5.txt b/620/CH24/EX24.5/example24_5.txt
new file mode 100644
index 000000000..bc135fa47
--- /dev/null
+++ b/620/CH24/EX24.5/example24_5.txt
diff --git a/620/CH24/EX24.7/example24_7.sce b/620/CH24/EX24.7/example24_7.sce
new file mode 100644
index 000000000..77555cdf6
--- /dev/null
+++ b/620/CH24/EX24.7/example24_7.sce
@@ -0,0 +1,23 @@
+l=30*10^(-3);

+c=0.005*10^(-6);

+r=1000;

+v=2;

+f=10*10^3;

+disp("Part a");

+x_l=2*%pi*f*l;

+x_c=1/(2*%pi*f*c);

+z=sqrt(r^2+(x_l-x_c)^2);

+disp("the circuit impedance (in Ω)"); disp(z);

+disp("Part b");

+i=v/z;

+disp("the circuit current (in mA) is"); disp(i*10^3);

+disp("Part c");

+vr=i*r;

+disp("voltage (in V) across resistor is"); disp(vr);

+vl=i*x_l;

+disp("voltage (in V) across inductor is"); disp(vl);

+vc=i*x_c;

+disp("voltage (in V) across capacitor is"); disp(vc);

+disp("Part d");

+deg=atan((x_l-x_c)/r);

+disp("the phase angle (in deg) between current and applied voltage is"); disp(deg);
\ No newline at end of file
diff --git a/620/CH24/EX24.7/example24_7.txt b/620/CH24/EX24.7/example24_7.txt
new file mode 100644
index 000000000..34665bc77
--- /dev/null
+++ b/620/CH24/EX24.7/example24_7.txt
diff --git a/620/CH24/EX24.8/example24_8.sce b/620/CH24/EX24.8/example24_8.sce
new file mode 100644
index 000000000..c380f382b
--- /dev/null
+++ b/620/CH24/EX24.8/example24_8.sce
@@ -0,0 +1,17 @@
+i=0.2;

+v1=120;

+f=60;

+v2=95;

+disp("Part a");

+z1=v1/i;

+x_l=sqrt(z1^2-r^2);

+z2=v2/i;

+x_c=x_l-sqrt(z2^2-r^2);

+c=1/(2*%pi*f*x_c);

+disp("the size of capacitance (in μF) needed is"); disp(c*10^6);

+disp("Part b");

+vc=i*x_c;

+disp("voltage (in V) across capacitor is");disp(vc);

+disp("Part c");

+v=i*z1;

+disp("voltage (in V) across solenoid is"); disp(v);
\ No newline at end of file
diff --git a/620/CH24/EX24.8/example24_8.txt b/620/CH24/EX24.8/example24_8.txt
new file mode 100644
index 000000000..158aaf5b5
--- /dev/null
+++ b/620/CH24/EX24.8/example24_8.txt