//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) +' ');