blob: 8d4b55ba16a7a534f5700f6790919cd0c67b14ac (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Example_a_8_1 page no:325
clc;
R=10;
L=0.1;
C=50*10^-6;
V=100;
omega=1/sqrt(L*C);
fr=omega/(2*%pi);
I=V/R;
Vl=I*omega*L;
Q=omega*L/R;
disp(Vl,"the voltage drop across the inductor is (in V)");
disp(Q,"the quality factor is");
|
