16 files changed, 79 insertions, 0 deletions
diff --git a/620/CH14/EX14.1/example14_1.sce b/620/CH14/EX14.1/example14_1.sce
new file mode 100644
index 000000000..78094a3fb
--- /dev/null
+++ b/620/CH14/EX14.1/example14_1.sce
@@ -0,0 +1,11 @@
+b=0.6;
+l=0.02;
+disp("Part a");
+t1=0.1;
+phi=b*l^2;
+v1=phi/t1;
+disp("the voltage induced (in V) in the wire is"); disp(v1);
+disp("Part b");
+t2=0.01;
+v2=phi/t2;
+disp("the voltage induced (n V) in the wire is"); disp(v2);
+\ No newline at end of file
diff --git a/620/CH14/EX14.1/example14_1.txt b/620/CH14/EX14.1/example14_1.txt
new file mode 100644
index 000000000..3277a2d6f
--- /dev/null
+++ b/620/CH14/EX14.1/example14_1.txt
diff --git a/620/CH14/EX14.2/example14_2.sce b/620/CH14/EX14.2/example14_2.sce
new file mode 100644
index 000000000..021ec9aa0
--- /dev/null
+++ b/620/CH14/EX14.2/example14_2.sce
@@ -0,0 +1,10 @@
+phi=0.03;
+disp("Part a");
+n=100;
+v=n*phi;
+disp("voltage induced (in V) in the coil is"); disp(v);
+disp("Part b");
+
+disp("By Lenz law the current must flow in the coil in such a direction as to set up an opposing force. This means that the left side of the solenoid must become a north pole while the permanent magnet is approaching . Applying the left-hand rule for a coil , the current must flow downward on the front of the coil. This means that point B is negative with respect to A");
+disp("Part c");
+disp("If the magnet is removed at twice the speed it entered , the rate of change of flux in the coil is doubled to 0.06 Wb/s, and the induced voltage is doubled to 6 V");
+\ No newline at end of file
diff --git a/620/CH14/EX14.2/example14_2.txt b/620/CH14/EX14.2/example14_2.txt
new file mode 100644
index 000000000..c6452f6e5
--- /dev/null
+++ b/620/CH14/EX14.2/example14_2.txt
diff --git a/620/CH14/EX14.4/example14_4.sce b/620/CH14/EX14.4/example14_4.sce
new file mode 100644
index 000000000..0b8defc99
--- /dev/null
+++ b/620/CH14/EX14.4/example14_4.sce
@@ -0,0 +1,8 @@
+l=0.8;
+vel=90;
+b=1.7*10^(-5);
+disp("Part a");
+v=b*l*vel*1000/3600;
+disp("the voltage induced (in μV) is"); disp(v*10^6);
+disp("Part b");
+disp("No voltage is induced when travelling north, since the antenna is travelling with the field and not cutting across it . ");
+\ No newline at end of file
diff --git a/620/CH14/EX14.4/example14_4.txt b/620/CH14/EX14.4/example14_4.txt
new file mode 100644
index 000000000..5ee95602d
--- /dev/null
+++ b/620/CH14/EX14.4/example14_4.txt
diff --git a/620/CH14/EX14.5/example14_5.sce b/620/CH14/EX14.5/example14_5.sce
new file mode 100644
index 000000000..17aca0024
--- /dev/null
+++ b/620/CH14/EX14.5/example14_5.sce
@@ -0,0 +1,16 @@
+disp("Part a");
+l=0.1;
+vel=20;
+b=0.7;
+v=b*l*vel;
+disp("the maximum voltage (in V) that can be induced is"); disp(v);
+disp("Part b");
+deg1=60*%pi/180;
+deg2=30*%pi/180;
+deg3=10*%pi/180;
+v1=v*sin(deg1);
+v2=v*sin(deg2);
+v3=v*sin(deg3);
+disp("voltage induced (in V) when moving at an angle of 60° is"); disp(v1);
+disp("voltage induced (in V) when moving at an angle of 30° is"); disp(v2);
+disp("voltage induced (in V) when moving at an angle of 10° is"); disp(v3);
+\ No newline at end of file
diff --git a/620/CH14/EX14.5/example14_5.txt b/620/CH14/EX14.5/example14_5.txt
new file mode 100644
index 000000000..c15d39ba4
--- /dev/null
+++ b/620/CH14/EX14.5/example14_5.txt
diff --git a/620/CH14/EX14.6/example14_6.sce b/620/CH14/EX14.6/example14_6.sce
new file mode 100644
index 000000000..8c0ed011c
--- /dev/null
+++ b/620/CH14/EX14.6/example14_6.sce
@@ -0,0 +1,14 @@
+vp=50;
+disp("Part a");
+vm=vp/2;
+disp("the peak volage (in V) is"); disp(vm);
+disp("Part b");
+deg1=2*%pi/3;
+deg2=3*2*%pi/5;
+deg3=5*2*%pi/4;
+v1=vm*sin(deg1);
+v2=vm*sin(deg2);
+v3=vm*sin(deg3);
+disp("the instantaneous volage (in V) at one-third the cycle is"); disp(v1);
+disp("the instantaneous volage (in V) at three-fifths he cycle is"); disp(v2);
+disp("the instantaneous volage (in V) at one-and-a-quarter cycle is"); disp(v3);
+\ No newline at end of file
diff --git a/620/CH14/EX14.6/example14_6.txt b/620/CH14/EX14.6/example14_6.txt
new file mode 100644
index 000000000..a9f672c64
--- /dev/null
+++ b/620/CH14/EX14.6/example14_6.txt
diff --git a/620/CH14/EX14.7/example14_7.sce b/620/CH14/EX14.7/example14_7.sce
new file mode 100644
index 000000000..6304164ba
--- /dev/null
+++ b/620/CH14/EX14.7/example14_7.sce
@@ -0,0 +1,8 @@
+vel=1200/60;
+b=0.6;
+l=0.4;
+r=0.1;
+n=50;
+a=l*2*r;
+v=2*%pi*n*b*a*vel;
+disp("the amplitude of voltage (in V) is"); disp(v);
+\ No newline at end of file
diff --git a/620/CH14/EX14.7/example14_7.txt b/620/CH14/EX14.7/example14_7.txt
new file mode 100644
index 000000000..0f253d40f
--- /dev/null
+++ b/620/CH14/EX14.7/example14_7.txt
diff --git a/620/CH14/EX14.8/example14_8.sce b/620/CH14/EX14.8/example14_8.sce
new file mode 100644
index 000000000..68347dda7
--- /dev/null
+++ b/620/CH14/EX14.8/example14_8.sce
@@ -0,0 +1,4 @@
+f=60;
+p=30/2;
+vel=f*60/p;
+disp("the speed (in r.p.m.) of the rotor should be"); disp(vel);
+\ No newline at end of file
diff --git a/620/CH14/EX14.8/example14_8.txt b/620/CH14/EX14.8/example14_8.txt
new file mode 100644
index 000000000..0b0398181
--- /dev/null
+++ b/620/CH14/EX14.8/example14_8.txt
diff --git a/620/CH14/EX14.9/example14_9.sce b/620/CH14/EX14.9/example14_9.sce
new file mode 100644
index 000000000..646de6a37
--- /dev/null
+++ b/620/CH14/EX14.9/example14_9.sce
@@ -0,0 +1,8 @@
+disp("Part a");
+f=60;
+t=1/f;
+disp("the period (in ms) is"); disp(t*1000);
+disp("Part b");
+t1=10^(-3);
+f1=1/t1;
+disp("the frequency (in kHz) of the waveform is"); disp(f1/1000);
+\ No newline at end of file
diff --git a/620/CH14/EX14.9/example14_9.txt b/620/CH14/EX14.9/example14_9.txt
new file mode 100644
index 000000000..506d6f135
--- /dev/null
+++ b/620/CH14/EX14.9/example14_9.txt