//EXAMPLE 7-16      PG NO-473
Zoc1=40;
Zsc1=36.67;
Zi1=sqrt((Zoc1*Zsc1));
disp('i) IMPEDANCE (Zi1) is   =  '+string (Zi1) +'ohm ');
Zoc2=30;
Zsc2=27.5;
Zi2=sqrt((Zoc2*Zsc2));
disp('ii) IMPEDANCE (Zi2) is   =  '+string (Zi2) +'ohm ');
TETA=1/tanh(0.9167);
disp('iii)  (TETA) is   =  '+string (TETA) +'degree ');