diff options
Diffstat (limited to '3760/CH9/EX9.5/ExB_5.sce')
| -rw-r--r-- | 3760/CH9/EX9.5/ExB_5.sce | 21 |
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);
+
+
|