blob: 17a614fcbb87a8d4f557a9a1475b4ec73f512835 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
//Example 3_37
clc;
clear;
close;
format('v',5);
//given data :
R=10;//ohm
L=20;//mH
C=10;//micro F
V=50;//V
f0=1/2/%pi/sqrt(L/1000*C/10^6);//Hz
disp(f0,"Resonance frequency(Hz)");
I0=V/R;//A
XL=2*%pi*f0*L/1000;//ohm
VL=I0*XL;//V
disp(VL,"Voltage across inductance(V)");
VR=I0*R;//V
disp(VR,"Voltage across Resistance(V)");
XC=1/2/%pi/f0/(C*10^-6);//ohm
VC=I0*XC;//V
disp(VC,"Voltage across Capacitance(V)");
Q=VL/V;//Q-factor
disp(Q,"Q-factor");
//Answer is not accurate in the book.
|
