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

---
 1964/CH5/EX5.10/ex5_10.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 1964/CH5/EX5.10/ex5_10.sce

(limited to '1964/CH5/EX5.10/ex5_10.sce')

diff --git a/1964/CH5/EX5.10/ex5_10.sce b/1964/CH5/EX5.10/ex5_10.sce
new file mode 100755
index 000000000..6681404ca
--- /dev/null
+++ b/1964/CH5/EX5.10/ex5_10.sce
@@ -0,0 +1,21 @@
+//Chapter-5, Example 5.10, Page 169
+//=============================================================================
+clc
+clear
+//INPUT DATA
+//given v=141.4*sin(314*t)
+P=700;//power in Watts
+pf=0.707;//powerfactor------>leading------>cos(phi)
+Vm=141.4;//maximum value of supply voltage
+//CALCULATIONS
+Vr=Vm/(sqrt(2));//rms value of supply voltage
+I=P/(Vr*pf);//current in A
+Z=Vr/I;//impedance in ohms
+R=(Z)*(pf);//resistance in ohms
+phi=acos(pf*180/%pi);//angle in degrees
+Xc=(Z)*(sin(phi));//reactance in ohms
+C=1/(3.14*7.13);//Capacitance in F
+mprintf("Thus resistance and capacitance are %1.2f ohms and %g F respectively",R,C);
+//=================================END OF PROGRAM======================================================================================================
+
+;
-- 
cgit