//EXAMPLE 7-17   PG NO-474-475
R=600;                        //RESISTANCE
I1=1/1200.13;
disp(' Current is   = '+string(I1)+'A');
I2=1/3793.54;
disp(' Current is   = '+string(I2)+'A');
P20=23984.9;
P2=2400;
IL=10*log10(P20/P2);
disp(' Insertion Loss is   = '+string(IL)+'dB');