1 files changed, 16 insertions, 0 deletions
diff --git a/1109/CH3/EX3.16/3_16.sce b/1109/CH3/EX3.16/3_16.sce
new file mode 100755
index 000000000..87eef7d66
--- /dev/null
+++ b/1109/CH3/EX3.16/3_16.sce
@@ -0,0 +1,16 @@
+clear;
+clc;
+f=7.5*(10^3);R=2.6;L=2.4*(10^-3);C=.0078*(10^-6);G=.11*(10^-6);l=50;Vs=10;
+w=2*%pi*f;
+Z=R+(%i*w*L);
+Y=G+(%i*w*C);
+Zo=sqrt(Z/Y);
+P=sqrt(Z*Y);
+Is=Vs/Zo;
+Ir=Is*(exp(-P*l));
+Ir1=abs(Ir);
+Rr=real(Zo);
+Pr=Ir1*Ir1*Rr;
+printf("Power consumed in load is Pr = %f mW",round(Pr*(10^3)*10)/10);
+//the difference in result  is due to erroneous value in textbook.
+disp("The difference in result is due to erroneous value in textbook")