summaryrefslogtreecommitdiff
path: root/1802/CH10/EX10.11/Exa10_11.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1802/CH10/EX10.11/Exa10_11.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1802/CH10/EX10.11/Exa10_11.sce')
-rwxr-xr-x1802/CH10/EX10.11/Exa10_11.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/1802/CH10/EX10.11/Exa10_11.sce b/1802/CH10/EX10.11/Exa10_11.sce
new file mode 100755
index 000000000..9998f2850
--- /dev/null
+++ b/1802/CH10/EX10.11/Exa10_11.sce
@@ -0,0 +1,24 @@
+//Exa 10.11
+clc;
+clear;
+close;
+//Given Data :
+format('v',7);
+Load=100;//in KW
+LoadPF=0.75;//powerfactor
+x=100;//in Rs/KVA
+y=600*(10/100);//in Rs.
+cosfi_2=sqrt(1-(y/x)^2)
+disp(cosfi_2,"P.F.(lag) is :");
+MaxDemand1=Load/LoadPF;//in KW(at 0.75 load power factor)
+MaxDemand2=Load/cosfi_2;//in KW(at cosfi_2 power factor)
+AnnSaving=(MaxDemand1-MaxDemand2)*x;//in Rs.
+cosfi_1=0.75;//powerfactor
+tanfi_1=tand(acosd(cosfi_1));//unitless
+tanfi_2=tand(acosd(cosfi_2));//unitless
+KVAR1=Load*tanfi_1;//in KVAR
+KVAR2=Load*cosfi_2;//in KVAR
+Rating=KVAR1-KVAR2;//in KVAR
+AnnualExpenditure=y*Rating;//in Rs.
+AnnualSaving=AnnSaving-AnnualExpenditure;//in Rs.
+disp(AnnualSaving,"Annual Savings(in Rs.) :"); \ No newline at end of file