summaryrefslogtreecommitdiff
path: root/1964/CH5/EX5.39/ex5_39.sce
blob: b74aa55ef8d3fbc33caeb9b044cb0568db5b983d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter-5, Example 5.39, Page 199
//=============================================================================
clc
clear
//INPUT DATA
R=4;//resistance in ohm
L=100*10^-6;//inductance in henry
C=250*10^-12;//capacitance in Farads
//CALCULATIONS
fr=inv(2*%pi*sqrt(L*C));//resonant frequency in Hz
Q=(inv(R))*(sqrt(L/C));//Q-factor
Bw=fr/Q;//bandwidth in Hz
hf1=fr+Bw;//halfpower freq1 in Hz
hf2=fr-Bw;//halfpower freq2 in Hz
mprintf("Thus resonant freq,Q-factor and new halfpower frequencies are %dhz ,%d,%g hz,%g hz respectively",fr,Q,hf1,hf2);
//note:given answers are wrong in textbook.Please check the answers
//=================================END OF PROGRAM======================================================================================================