summaryrefslogtreecommitdiff
path: root/1616/CH2/EX2.14/ex2_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '1616/CH2/EX2.14/ex2_14.sce')
-rw-r--r--1616/CH2/EX2.14/ex2_14.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/1616/CH2/EX2.14/ex2_14.sce b/1616/CH2/EX2.14/ex2_14.sce
new file mode 100644
index 000000000..debec0db2
--- /dev/null
+++ b/1616/CH2/EX2.14/ex2_14.sce
@@ -0,0 +1,12 @@
+//ex2.14 find the power delivered to the load and the peak voltage at the load-end of the line
+
+ZL=50;
+Z0=50+%i*50;
+Tl=(ZL-Z0)/(ZL+Z0);
+VSWR=(1+abs(Tl))/(1-abs(Tl));
+disp('VSWR = '+string(VSWR));
+vmax=50;
+PL=0.5*vmax^2/(VSWR*real(Z0));
+RL=50;
+VL=sqrt(PL*RL*2);
+disp('Peak voltage at the load = '+string(VL)+' V','Power delivered to the load = '+string(PL)+' W');