summaryrefslogtreecommitdiff
path: root/1616/CH2/EX2.13/ex2_13.sce
diff options
context:
space:
mode:
Diffstat (limited to '1616/CH2/EX2.13/ex2_13.sce')
-rw-r--r--1616/CH2/EX2.13/ex2_13.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1616/CH2/EX2.13/ex2_13.sce b/1616/CH2/EX2.13/ex2_13.sce
new file mode 100644
index 000000000..734f1ddca
--- /dev/null
+++ b/1616/CH2/EX2.13/ex2_13.sce
@@ -0,0 +1,14 @@
+//to find VSWR and max and min resistance
+r=100;
+c=1e-9;
+f=2e6;
+w=2*%pi*f;
+zl=r/(1+(w*%i*r*c));//(r*(1/%i*w*c))/(r+(1/%i*w*c));
+zo=50;
+tl=(zl-zo)/(zl+zo);
+Tl=abs(tl);
+VSWR=(1+Tl)/(1-Tl);
+disp('The VSWR = '+string(VSWR));
+rmax=VSWR*zo;
+rmin=zo/VSWR;
+disp('maximum resistance on line is = '+string(rmax)+' kohm','minimum resistance on line is = '+string(rmin)+' kohm'); \ No newline at end of file