summaryrefslogtreecommitdiff
path: root/2414/CH14/EX14.8/Ex14_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '2414/CH14/EX14.8/Ex14_8.sce')
-rwxr-xr-x2414/CH14/EX14.8/Ex14_8.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2414/CH14/EX14.8/Ex14_8.sce b/2414/CH14/EX14.8/Ex14_8.sce
new file mode 100755
index 000000000..d3fc831aa
--- /dev/null
+++ b/2414/CH14/EX14.8/Ex14_8.sce
@@ -0,0 +1,18 @@
+clc;
+close();
+clear();
+//page no 481
+//prob no. 14.8
+Rin=50 //ohm
+Rout=50; //ohm
+Vrms=400; //V
+
+l=50; //m
+Ldb=.01*l; //dB
+L=10^(Ldb/10);
+mprintf('The abslute loss is, L = %f \n',L);
+Irms=Vrms/(Rin+Rout); //A
+Pin=Irms^2*Rin;
+
+PL=Pin/L;
+mprintf(' The actual Power reaching the load is, PL = %.1f W \n',PL);