diff options
Diffstat (limited to '1445/CH2/EX2.45/ch2_ex_45.sce')
-rw-r--r-- | 1445/CH2/EX2.45/ch2_ex_45.sce | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/1445/CH2/EX2.45/ch2_ex_45.sce b/1445/CH2/EX2.45/ch2_ex_45.sce new file mode 100644 index 000000000..524c2f5a7 --- /dev/null +++ b/1445/CH2/EX2.45/ch2_ex_45.sce @@ -0,0 +1,35 @@ +//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT +//Example 45 + +disp("CHAPTER 2"); +disp("EXAMPLE 45"); + +//VARIABLE INITIALIZATION +L=1.405; //in Henry +r=40; //in Ohms +c=20/(10^6); //in Farad +v=100; //in Volts + +//SOLUTION +f0=1/(2*%pi*sqrt(L*c)); +disp(sprintf("The frequency at which the circuit resonates is %d Hz",f0)); + +I0=v/r; +disp(sprintf("The current drawn from the supply is %f A",I0)); + +xl0=2*%pi*f0*L; +z0=sqrt((r^2)+(xl0^2)); +vl0=I0*z0; +disp(sprintf("The voltage across the coil is %f V",vl0)); + +xc0=1/(2*%pi*f0*c); +disp(sprintf("The capcitative reactance is %f Ω",xc0)); + +Q0=(2*%pi*f0*L)/r; +disp(sprintf("The quality factor is %f", Q0)); + +bw=r/L; +disp(sprintf("The bandwidth is %f Hz",bw)); + +//END + |