From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 608/CH19/EX19.15/19_15.sce | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100755 608/CH19/EX19.15/19_15.sce

(limited to '608/CH19/EX19.15/19_15.sce')

diff --git a/608/CH19/EX19.15/19_15.sce b/608/CH19/EX19.15/19_15.sce
new file mode 100755
index 000000000..52c2c97be
--- /dev/null
+++ b/608/CH19/EX19.15/19_15.sce
@@ -0,0 +1,16 @@
+//Problem 19.15: Two wattmeters are connected to measure the input power to a balanced 3-phase load by the two-wattmeter method. If the instrument readings are 8 kW and 4 kW, determine (a) the total power input and (b) the load power factor.
+
+//initializing the variables:
+Pi1 = 8000; // in Watts
+Pi2 = 4000; // in Watts
+
+//calculation:
+//Total input power
+Pi = Pi1 + Pi2
+phi = atan((Pi1 - Pi2)*(3^0.5)/(Pi1 + Pi2))
+//Power factor
+pf = cos(phi)
+
+printf("\n\n Result \n\n")
+printf("\n (a)power input is %.1E W",Pi)
+printf("\n (b)power factor is %.3f",pf)
\ No newline at end of file
-- 
cgit