summaryrefslogtreecommitdiff
path: root/3871/CH7/EX7.7/Ex7_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3871/CH7/EX7.7/Ex7_7.sce')
-rw-r--r--3871/CH7/EX7.7/Ex7_7.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3871/CH7/EX7.7/Ex7_7.sce b/3871/CH7/EX7.7/Ex7_7.sce
new file mode 100644
index 000000000..f2c868146
--- /dev/null
+++ b/3871/CH7/EX7.7/Ex7_7.sce
@@ -0,0 +1,27 @@
+//===========================================================================
+//chapter 7 example 7
+clc;clear all;
+
+//variable declaration
+V = 250; //load voltage in V
+I = 12; //load current in A
+Rc = 0.1; //resistance in Ω
+Rp =6500; //resistance in Ω
+x = 1; //pf cos(phi)
+y = 0.4; //pf cos(phi)
+
+//calculations
+P = V*I*x; //power input to the apparatus in W
+PL = (I^2)*Rc; //power lost in current coil in W
+e = (PL/P)*100; //percentage error in %
+Pc = (V^2)/Rp; //power lost in presuure coil in W
+e = (Pc/P)*100; //percentage error in %
+P1 = V*I*y; //power input to the apparatus in W
+PL1 = (I^2)*Rc; //power lost in current coil in W
+e1 = (PL1/P1)*100; //percentage error in %
+Pc1 = (V^2)/Rp; //power lost in presuure coil in W
+e1 = (Pc1/P1)*100; //percentage error in %
+
+//result
+mprintf("percentage error when pf 1 lagging %3.2f percentage",e);
+mprintf("\npercentage error when pf 0.4 lagging %3.2f percentage",e1);