1 files changed, 13 insertions, 0 deletions
diff --git a/1094/CH2/EX2.3.2/EX2_3_2.sce b/1094/CH2/EX2.3.2/EX2_3_2.sce
new file mode 100644
index 000000000..3c59ebb74
--- /dev/null
+++ b/1094/CH2/EX2.3.2/EX2_3_2.sce
@@ -0,0 +1,13 @@
+//Exa:2.3.2
+clc;
+clear;
+close;
+V_L=400 //supply voltage(in volts)
+W_1=750 //power (in W)
+W_2=250 //power (in W)
+P_i=W_1+W_2
+disp(P_i,'input power (in W)=')
+pf=cosd(atand(sqrt(3)*(W_1-W_2)/(W_1+W_2)))
+disp(pf,'power factor=')
+I_L=P_i/(sqrt(3)*V_L*pf)
+disp(I_L,'line current(in A)=')
+\ No newline at end of file