initial commit / add all books

2 files changed, 35 insertions, 0 deletions

diff --git a/620/CH25/EX25.19/example25_19.sce b/620/CH25/EX25.19/example25_19.sce
new file mode 100644
index 000000000..2602afd62
--- /dev/null
+++ b/620/CH25/EX25.19/example25_19.sce
@@ -0,0 +1,35 @@
+r1=100;

+r2=220;

+r3=150;

+l1=50*10^(-3);

+l2=100*10^(-3);

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

+f=400;

+v=24;

+disp("Part a");

+x_l1=2*%pi*f*l1;

+x_l2=2*%pi*f*l2;

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

+z1=r1+%i*x_l1;

+z2=r2+%i*x_l2;

+z3=r3-%i*x_c;

+z=z1+z2*z3/(z2+z3);

+m_z=sqrt(real(z)^2+imag(z)^2);

+deg_z=atan(imag(z)/real(z))*180/%pi;

+disp("the total impedance (in Ω) of the circuit has a magnitude of"); disp(m_z);

+disp("with a phase angle (in deg) of"); disp(deg_z);

+disp("Part b");

+m_i=v/m_z;

+deg_i=-deg_z;

+disp("the total supply current (in mA) has a magnitude of"); disp(m_i*10^3);

+disp("with a phase angle (in deg) of"); disp(deg_i);

+disp("Part c");

+m_v1=m_i*sqrt(real(z1)^2+imag(z1)^2);

+deg_v1=deg_i+atan(imag(z1)/real(z1))*180/%pi;

+disp("the reading of voltmeter (in V) has a magnitude of"); disp(m_v1);

+disp("with a phase angle (in deg) of"); disp(deg_v1);

+disp("Part d");

+m_ic=m_i*sqrt(real(z2)^2+imag(z2)^2)/sqrt(real(z2+z3)^2+imag(z2+z3)^2);

+deg_ic=deg_i+(atan(imag(z2)/real(z2))-atan(imag(z2+z3)/real(z2+z3)))*180/%pi;

+disp("the current (in mA) through the capacitor has a magnitude of"); disp(m_ic*10^3);

+disp("with a phase angle (in deg) of"); disp(deg_ic);
\ No newline at end of file
diff --git a/620/CH25/EX25.19/example25_19.txt b/620/CH25/EX25.19/example25_19.txt
new file mode 100644
index 000000000..c2fefad44
--- /dev/null
+++ b/620/CH25/EX25.19/example25_19.txt