1 files changed, 25 insertions, 0 deletions
diff --git a/1445/CH3/EX3.5/ch3_ex_5.sce b/1445/CH3/EX3.5/ch3_ex_5.sce
new file mode 100644
index 000000000..dc38bd18e
--- /dev/null
+++ b/1445/CH3/EX3.5/ch3_ex_5.sce
@@ -0,0 +1,25 @@
+//CHAPTER 3- THREE-PHASE A.C. CIRCUITS
+//Example 5
+
+disp("CHAPTER 3");
+disp("EXAMPLE 5");
+
+//VARIABLE INITIALIZATION
+w1=5000;                       //reading of 1st wattmeter in Watts
+w2=-1000;                      //reading of 2nd wattmeter in Watts
+
+//SOLUTION
+
+//solution (a)
+p1=w1+w2;
+disp(sprintf("(a) The total power is %d W",p1));
+
+//solution (b)
+p2=w1-w2;
+phi=atan((sqrt(3)*p2)/p1);    
+pow_fact=cos(phi);            
+disp(sprintf("(b) The power factor of the load is %f", pow_fact));
+
+//END
+
+