summaryrefslogtreecommitdiff
path: root/3673/CH8/EX8.3/Ex8_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3673/CH8/EX8.3/Ex8_3.sce')
-rw-r--r--3673/CH8/EX8.3/Ex8_3.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3673/CH8/EX8.3/Ex8_3.sce b/3673/CH8/EX8.3/Ex8_3.sce
new file mode 100644
index 000000000..1eff1947e
--- /dev/null
+++ b/3673/CH8/EX8.3/Ex8_3.sce
@@ -0,0 +1,19 @@
+//Example 8_3 page no:299
+clc;
+R=10;//resistance is ohm
+L=0.1;//inductive reactance in henry
+C=10*10^-6;//capacitive reactance in farad
+f=1/(2*%pi*sqrt(L*C));//frequency in Hz
+fa10=f+10;
+fb10=f-10;
+Z=R;//impedence at resonance
+disp(Z,"impedence at resonance is (in ohm)");
+Xc1=1/(2*%pi*fa10*C);//capacitive reactance at 149.2
+Xc2=1/(2*%pi*fb10*C);//capacitive reactance at 169.2
+Xl1=2*%pi*fa10*L;//inductive reactance at 149.2
+Xl2=2*%pi*fb10*L;//inductive reactance at 169.2
+Z1=sqrt(R^2+(Xl1-Xc1)^2);
+disp(Z1,"impedence at 10Hz above resonance(i.e 149.2 Hz) is (in ohm)");
+Z2=sqrt(R^2+(Xl2-Xc2)^2);
+disp(Z2,"impedence at 10Hz below resonance(i.e 169.2 Hz) is (in ohm)");
+//in text book square value of resistance is rounded so answer of impedence is approximate in text book