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

---
 1802/CH10/EX10.15/Exa10_15.sce | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100755 1802/CH10/EX10.15/Exa10_15.sce

(limited to '1802/CH10/EX10.15')

diff --git a/1802/CH10/EX10.15/Exa10_15.sce b/1802/CH10/EX10.15/Exa10_15.sce
new file mode 100755
index 000000000..1f5dfead4
--- /dev/null
+++ b/1802/CH10/EX10.15/Exa10_15.sce
@@ -0,0 +1,28 @@
+//Exa 10.15
+clc;
+clear;
+close;
+//Given Data :
+format('v',9);
+f=50;//in Hz
+V=240;//in Volts
+TotalLoad=200+80;//in KW
+cosfi_1=0.8;//unitless
+tanfi_1=tand(acosd(cosfi_1));
+cosfi_2=0.9;//unitless
+tanfi_2=tand(acosd(cosfi_2));
+//(i)
+OA=200;//in KW
+OD=280;//in KW
+CM=OA*tanfi_1-OD*tanfi_2;//in KVAR
+disp(CM,"Leading KVAR supplied by the motor(in KVAR) :");
+//(ii)
+BM=80;//in KW
+CM=15.6;//in KW
+KVA_Rating=sqrt(BM^2+CM^2);//in KVA
+disp(KVA_Rating,"KVA rating(in KVA) :");
+//(iii)
+BC=KVA_Rating;//in KW
+cosfi_m=BM/BC;//unitless
+disp(cosfi_m,"P.F. Of the motor  : ");
+//Note : Answer of (i) part is wrong in the book is wrong
\ No newline at end of file
-- 
cgit