summaryrefslogtreecommitdiff
path: root/620/CH20
diff options
context:
space:
mode:
Diffstat (limited to '620/CH20')
-rw-r--r--620/CH20/EX20.1/example20_1.sce5
-rw-r--r--620/CH20/EX20.1/example20_1.txtbin0 -> 132 bytes
-rw-r--r--620/CH20/EX20.10/example20_10.sce9
-rw-r--r--620/CH20/EX20.10/example20_10.txt4
-rw-r--r--620/CH20/EX20.11/example20_11.sce5
-rw-r--r--620/CH20/EX20.11/example20_11.txt4
-rw-r--r--620/CH20/EX20.12/example20_12.sce10
-rw-r--r--620/CH20/EX20.12/example20_12.txtbin0 -> 272 bytes
-rw-r--r--620/CH20/EX20.2/example20_2.sce4
-rw-r--r--620/CH20/EX20.2/example20_2.txt3
-rw-r--r--620/CH20/EX20.3/example20_3.sce4
-rw-r--r--620/CH20/EX20.3/example20_3.txt3
-rw-r--r--620/CH20/EX20.4/example20_4.sce10
-rw-r--r--620/CH20/EX20.4/example20_4.txt9
-rw-r--r--620/CH20/EX20.5/example20_5.sce6
-rw-r--r--620/CH20/EX20.5/example20_5.txt4
-rw-r--r--620/CH20/EX20.6/example20_6.sce10
-rw-r--r--620/CH20/EX20.6/example20_6.txtbin0 -> 286 bytes
-rw-r--r--620/CH20/EX20.7/example20_7.sce17
-rw-r--r--620/CH20/EX20.7/example20_7.txtbin0 -> 588 bytes
-rw-r--r--620/CH20/EX20.8/example20_8.sce17
-rw-r--r--620/CH20/EX20.8/example20_8.txtbin0 -> 608 bytes
-rw-r--r--620/CH20/EX20.9/example20_9.sce20
-rw-r--r--620/CH20/EX20.9/example20_9.txtbin0 -> 616 bytes
24 files changed, 144 insertions, 0 deletions
diff --git a/620/CH20/EX20.1/example20_1.sce b/620/CH20/EX20.1/example20_1.sce
new file mode 100644
index 000000000..72a0de0f4
--- /dev/null
+++ b/620/CH20/EX20.1/example20_1.sce
@@ -0,0 +1,5 @@
+vp=28.28;
+i=10*10^(-3);
+v=vp/(2*sqrt(2));
+x_l=v/i;
+disp("the opposition to current (in kΩ) is"); disp(x_l*10^(-3)); \ No newline at end of file
diff --git a/620/CH20/EX20.1/example20_1.txt b/620/CH20/EX20.1/example20_1.txt
new file mode 100644
index 000000000..daca05a73
--- /dev/null
+++ b/620/CH20/EX20.1/example20_1.txt
Binary files differ
diff --git a/620/CH20/EX20.10/example20_10.sce b/620/CH20/EX20.10/example20_10.sce
new file mode 100644
index 000000000..31a6bf671
--- /dev/null
+++ b/620/CH20/EX20.10/example20_10.sce
@@ -0,0 +1,9 @@
+l1=8;
+l2=4;
+v=120;
+f=60;
+x_l1=2*%pi*f*l1;
+x_l2=2*%pi*f*l2;
+x_l=1/(1/x_l1+1/x_l2);
+i=v/x_l;
+disp("the total current (in mA) drawn from the supply is"); disp(i*10^3); \ No newline at end of file
diff --git a/620/CH20/EX20.10/example20_10.txt b/620/CH20/EX20.10/example20_10.txt
new file mode 100644
index 000000000..e6280abcf
--- /dev/null
+++ b/620/CH20/EX20.10/example20_10.txt
@@ -0,0 +1,4 @@
+
+ the total current (in mA) drawn from the supply is
+
+ 119.36621 \ No newline at end of file
diff --git a/620/CH20/EX20.11/example20_11.sce b/620/CH20/EX20.11/example20_11.sce
new file mode 100644
index 000000000..e8bc297b9
--- /dev/null
+++ b/620/CH20/EX20.11/example20_11.sce
@@ -0,0 +1,5 @@
+l=200*10^(-6);
+f=1.5*10^6;
+r=100;
+q=2*%pi*f*l/r;
+disp("the quality of the coil is"); disp(q); \ No newline at end of file
diff --git a/620/CH20/EX20.11/example20_11.txt b/620/CH20/EX20.11/example20_11.txt
new file mode 100644
index 000000000..476b353d7
--- /dev/null
+++ b/620/CH20/EX20.11/example20_11.txt
@@ -0,0 +1,4 @@
+
+ the quality of the coil is
+
+ 18.849556 \ No newline at end of file
diff --git a/620/CH20/EX20.12/example20_12.sce b/620/CH20/EX20.12/example20_12.sce
new file mode 100644
index 000000000..cddb1bd45
--- /dev/null
+++ b/620/CH20/EX20.12/example20_12.sce
@@ -0,0 +1,10 @@
+l=0.5;
+f=60;
+i=0.25;
+p=5;
+disp("Part a");
+r=p/i^2;
+disp("the ac resistance (in Ω) of the coil is"); disp(r);
+disp("part b");
+q=2*%pi*f*l/r;
+disp("the Q of the coil is"); disp(q); \ No newline at end of file
diff --git a/620/CH20/EX20.12/example20_12.txt b/620/CH20/EX20.12/example20_12.txt
new file mode 100644
index 000000000..6e7b9a0a6
--- /dev/null
+++ b/620/CH20/EX20.12/example20_12.txt
Binary files differ
diff --git a/620/CH20/EX20.2/example20_2.sce b/620/CH20/EX20.2/example20_2.sce
new file mode 100644
index 000000000..bff68f582
--- /dev/null
+++ b/620/CH20/EX20.2/example20_2.sce
@@ -0,0 +1,4 @@
+x_l=500;
+v=120;
+i=v/x_l;
+disp("the current (in A) that will flow through the coil is");disp(i); \ No newline at end of file
diff --git a/620/CH20/EX20.2/example20_2.txt b/620/CH20/EX20.2/example20_2.txt
new file mode 100644
index 000000000..2b54cc7c4
--- /dev/null
+++ b/620/CH20/EX20.2/example20_2.txt
@@ -0,0 +1,3 @@
+the current (in A) that will flow through the coil is
+
+ 0.24 \ No newline at end of file
diff --git a/620/CH20/EX20.3/example20_3.sce b/620/CH20/EX20.3/example20_3.sce
new file mode 100644
index 000000000..07a997568
--- /dev/null
+++ b/620/CH20/EX20.3/example20_3.sce
@@ -0,0 +1,4 @@
+x_l=1.5;
+i=70;
+v=i*x_l;
+disp("the voltage drop (in V) acoss the coil is"); disp(v); \ No newline at end of file
diff --git a/620/CH20/EX20.3/example20_3.txt b/620/CH20/EX20.3/example20_3.txt
new file mode 100644
index 000000000..6e74e8e6a
--- /dev/null
+++ b/620/CH20/EX20.3/example20_3.txt
@@ -0,0 +1,3 @@
+ the voltage drop (in V) acoss the coil is
+
+ 105. \ No newline at end of file
diff --git a/620/CH20/EX20.4/example20_4.sce b/620/CH20/EX20.4/example20_4.sce
new file mode 100644
index 000000000..c36ba1161
--- /dev/null
+++ b/620/CH20/EX20.4/example20_4.sce
@@ -0,0 +1,10 @@
+v=120;
+f=60;
+l=5;
+disp("Part a");
+x_l=2*%pi*f*l;
+i=v/x_l;
+disp("the current (in mA) flowing is"); disp(i*10^3);
+disp("Part b");
+im=i*sqrt(2);
+disp("the equation for current is i = 0.091*sin(377t) A"); \ No newline at end of file
diff --git a/620/CH20/EX20.4/example20_4.txt b/620/CH20/EX20.4/example20_4.txt
new file mode 100644
index 000000000..87c243a11
--- /dev/null
+++ b/620/CH20/EX20.4/example20_4.txt
@@ -0,0 +1,9 @@
+Part a
+
+ the current (in mA) flowing is
+
+ 63.661977
+
+ Part b
+
+ the equation for current is i = 0.091*sin(377t) A \ No newline at end of file
diff --git a/620/CH20/EX20.5/example20_5.sce b/620/CH20/EX20.5/example20_5.sce
new file mode 100644
index 000000000..7002a0ad7
--- /dev/null
+++ b/620/CH20/EX20.5/example20_5.sce
@@ -0,0 +1,6 @@
+f=10^3;
+v=10;
+i=50*10^(-3);
+x_l=v/i;
+l=x_l/(2*%pi*f);
+disp("the inductance of the coil (in mH) is"); disp(l*10^3); \ No newline at end of file
diff --git a/620/CH20/EX20.5/example20_5.txt b/620/CH20/EX20.5/example20_5.txt
new file mode 100644
index 000000000..17c23c265
--- /dev/null
+++ b/620/CH20/EX20.5/example20_5.txt
@@ -0,0 +1,4 @@
+
+ the inductance of the coil (in mH) is
+
+ 31.830989 \ No newline at end of file
diff --git a/620/CH20/EX20.6/example20_6.sce b/620/CH20/EX20.6/example20_6.sce
new file mode 100644
index 000000000..7c60597ff
--- /dev/null
+++ b/620/CH20/EX20.6/example20_6.sce
@@ -0,0 +1,10 @@
+v=10;
+l=10;
+r=100;
+f=60;
+disp("Part a");
+disp("the dc output voltage (in V) is"); disp(v);
+disp("Part b");
+x_l=2*%pi*f*l;
+vo=v*r/x_l;
+disp("the ac output voltage (in V) is"); disp(vo); \ No newline at end of file
diff --git a/620/CH20/EX20.6/example20_6.txt b/620/CH20/EX20.6/example20_6.txt
new file mode 100644
index 000000000..5ad9fe9ca
--- /dev/null
+++ b/620/CH20/EX20.6/example20_6.txt
Binary files differ
diff --git a/620/CH20/EX20.7/example20_7.sce b/620/CH20/EX20.7/example20_7.sce
new file mode 100644
index 000000000..a68acd8c4
--- /dev/null
+++ b/620/CH20/EX20.7/example20_7.sce
@@ -0,0 +1,17 @@
+p1=60;
+t=8;
+p2=9;
+amt=20;
+cost=0.08;
+disp("Part a");
+total=365*t*p1*cost/1000;
+disp("Cost (in $) to operate the incandescent lamp for a year is"); disp(total);
+disp("Part b");
+total2=365*t*p2*cost/1000;
+disp("Cost (in $ )to operate the fluorescent lamp for a year is"); disp(total2);
+disp("Part c");
+sav=total-total2;
+mon=amt*12/sav;
+t1=10000;
+t2=t1-365*t*mon/12;
+disp("the time (in hours) necessary for the energy savings is");disp(t2); \ No newline at end of file
diff --git a/620/CH20/EX20.7/example20_7.txt b/620/CH20/EX20.7/example20_7.txt
new file mode 100644
index 000000000..74c7b713b
--- /dev/null
+++ b/620/CH20/EX20.7/example20_7.txt
Binary files differ
diff --git a/620/CH20/EX20.8/example20_8.sce b/620/CH20/EX20.8/example20_8.sce
new file mode 100644
index 000000000..0792239d4
--- /dev/null
+++ b/620/CH20/EX20.8/example20_8.sce
@@ -0,0 +1,17 @@
+l1=4;
+l2=8;
+v=120;
+f=60;
+disp("Part a");
+x_l1=2*%pi*f*l1;
+x_l2=2*%pi*f*l2;
+x_l=x_l1+x_l2;
+disp("he total inductive inductance (in kΩ) is"); disp(x_l*10^(-3));
+disp("Part b");
+i=v/x_l;
+disp("the reading of ammeter (in mA) is"); disp(i*10^3);
+disp("Part c");
+v1=i*x_l1;
+v2=i*x_l2;
+disp("the voltage drop (in V) across 4 H coil is"); disp(v1);
+disp("the voltage drop (in V) across 8 H coil is"); disp(v2); \ No newline at end of file
diff --git a/620/CH20/EX20.8/example20_8.txt b/620/CH20/EX20.8/example20_8.txt
new file mode 100644
index 000000000..9c41cc815
--- /dev/null
+++ b/620/CH20/EX20.8/example20_8.txt
Binary files differ
diff --git a/620/CH20/EX20.9/example20_9.sce b/620/CH20/EX20.9/example20_9.sce
new file mode 100644
index 000000000..28d4d2901
--- /dev/null
+++ b/620/CH20/EX20.9/example20_9.sce
@@ -0,0 +1,20 @@
+l1=4;
+l2=8;
+k=0.6;
+f=60;
+disp("Part a");
+m=k*sqrt(l1*l2);
+x_m=2*%pi*f*m;
+x_l1=2*%pi*f*l1;
+x_l2=2*%pi*f*l2;
+x_l=x_l1+x_l2+x_m;
+disp("the total inductive reactance (in kΩ) is");disp(x_l*10^(-3));
+disp("Part b");
+v=120;
+i=v/x_l;
+disp("the current (in mA) throught the coil is"); disp(i*10^3);
+disp("Part c");
+v1=i*(x_l1+x_m);
+disp("voltage (in V) across 4 H coil is"); disp(v1);
+v2=i*(x_l2+x_m);
+disp("voltage (in V) across 8 H coil is");disp(v2); \ No newline at end of file
diff --git a/620/CH20/EX20.9/example20_9.txt b/620/CH20/EX20.9/example20_9.txt
new file mode 100644
index 000000000..d59d7e8fc
--- /dev/null
+++ b/620/CH20/EX20.9/example20_9.txt
Binary files differ