summaryrefslogtreecommitdiff
path: root/503/CH8/EX8.36
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /503/CH8/EX8.36
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 '503/CH8/EX8.36')
-rwxr-xr-x503/CH8/EX8.36/ch8_36.sci17
1 files changed, 17 insertions, 0 deletions
diff --git a/503/CH8/EX8.36/ch8_36.sci b/503/CH8/EX8.36/ch8_36.sci
new file mode 100755
index 000000000..fb964b04a
--- /dev/null
+++ b/503/CH8/EX8.36/ch8_36.sci
@@ -0,0 +1,17 @@
+//to find the pf and current supplied by the m/c
+
+clc;
+P=50000;
+pf=.8;
+phi=acosd(pf);
+Q=P*tand(phi);
+P1=P/2;
+pf1=.9;
+phi1=acosd(pf1);
+Q1=P1*tand(phi1);
+P2=P/2;
+Q2=Q-Q1;
+phi2=atand(Q2/P2);
+pf=cosd(phi2);disp(pf,'pf');
+V_L=400;
+I2=P2/(sqrt(3)*V_L*pf);disp(I2,'current supplied by m/c(A)');