1 files changed, 15 insertions, 0 deletions
diff --git a/2075/CH1/EX1.7/pe1_7.sce b/2075/CH1/EX1.7/pe1_7.sce
new file mode 100755
index 000000000..532397fe4
--- /dev/null
+++ b/2075/CH1/EX1.7/pe1_7.sce
@@ -0,0 +1,15 @@
+//example 1.7
+clc; funcprot(0);
+// Initialization of Variable
+Vs=18;//V
+Rl=8;//load resistance
+Pll=100;//power
+//calculation
+Vlp=Vs-4;
+Vlr=Vlp/(2^.5);
+disp(Vlr,"rms voltage in V:")
+Pl=(Vlr^2)/Rl;
+disp(Pl,"power delivered in W:")
+Vl=(Pll*Rl)^.5;
+disp(Vl,"load voltage in V:")
+clear()