summaryrefslogtreecommitdiff
path: root/1445/CH2/EX2.54/Ex2_54.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH2/EX2.54/Ex2_54.sce')
-rw-r--r--1445/CH2/EX2.54/Ex2_54.sce33
1 files changed, 33 insertions, 0 deletions
diff --git a/1445/CH2/EX2.54/Ex2_54.sce b/1445/CH2/EX2.54/Ex2_54.sce
new file mode 100644
index 000000000..4b6e43d75
--- /dev/null
+++ b/1445/CH2/EX2.54/Ex2_54.sce
@@ -0,0 +1,33 @@
+//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
+//Example 54 Read example 53 of the Book
+
+disp("CHAPTER 2");
+disp("EXAMPLE 54");
+
+//VARIABLE INITIALIZATION
+C=2.5/(10^6); //capcaitance in Farads
+R=15; //in Ohms
+L=260/1000; //in Henry
+
+//SOLUTION
+//resonant Frequency is given by
+//fr= 1/ 2.pi.(sqrt (1/LC - R^2/L^2))
+//Q-factor is given by:
+//Qf=2.pi.fr.L/R
+//dynamic impedance is given by
+//Zr=L/C.R
+//
+//solution (i)
+f_r=(1/(2*%pi))*sqrt((1/(L*C)-(R^2/L^2)));
+f_r=round(f_r); //to round off the value
+disp(sprintf("(i) The resonant frequency is %d Hz",f_r));
+
+//solution (ii)
+q_factor=(2*%pi*f_r*L)/R;
+disp(sprintf("(ii) The Q-factor of the circuit is %.2f",q_factor));
+
+//solution (iii)
+Z_r=L/(C*R);
+disp(sprintf("(iii) The dynamic impedance of the circuit is %.0f Ω",Z_r));
+
+//END