summaryrefslogtreecommitdiff
path: root/1760/CH8/EX8.20/EX8_20.sce
blob: 1218b45685bdead73da923c6681fabd6e44ddca6 (plain)
1
2
3
4
5
6
7
                 //EXAMPLE 8-20   PG NO-535
Ro=450;
Fc=20000;
L=Ro/(4*%pi*Fc);
C=1/(4*%pi*Fc*Ro);
Z1=Ro/(2*%pi*Fc);
disp('i) IMPEDANCE (Z1) is   =  '+string (Z1) +' ');