summaryrefslogtreecommitdiff
path: root/3673/CH8/EX8.a.8/Example_a_8_8.sce
blob: 8ac9d6b3be0a238634427f809357a1bc1c97b28b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example_a_8_8 page no:330
clc;
V=10;
fr=100;
C=10*10^-6;
omega=900;
L=1/(C*(2*%pi*fr)^2);
C=12*10^-6;
R=(omega*L)-(1/(omega*C));
Q=omega*L/R;
I=V/R;
disp(L,"the inductance is (in H)");
disp(R,"the resistance is (in ohm)");
disp(Q,"the quality factor is ");
disp(I,"the maximum current in the circuit is (in A)");
//resistance value varies in the textbook due to inductance value is rounded off in text book