summaryrefslogtreecommitdiff
path: root/3760/CH9/EX9.5/ExB_5.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3760/CH9/EX9.5/ExB_5.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3760/CH9/EX9.5/ExB_5.sce')
-rw-r--r--3760/CH9/EX9.5/ExB_5.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3760/CH9/EX9.5/ExB_5.sce b/3760/CH9/EX9.5/ExB_5.sce
new file mode 100644
index 000000000..0261d1582
--- /dev/null
+++ b/3760/CH9/EX9.5/ExB_5.sce
@@ -0,0 +1,21 @@
+clc;
+zs=10+15*%i; // star connected load per phase
+zd=12-15*%i; // delta connected load per phase
+vl=400; // supply line voltage
+disp('case a');
+// converting delta connected load to star connected load
+zd=zd/3;
+vp=vl/sqrt(3);
+i1=vp/zs; // line current in star connected load
+i2=vp/zd; // line current in delta connected load
+i=abs(i1+i2);
+printf('Total line current is %f A\n',i);
+an=atand(imag(i1+i2),real(i1+i2));
+pf=cosd(an);
+P=(sqrt(3)*vl*i*pf);
+pr=sqrt(3)*vl*i*sqrt(1-pf^2);
+printf('Power factor is %f leading\n',pf);
+printf('Total power is %f W\n',P);
+printf('Total reactve power is %f VAr',pr);
+
+