diff options
Diffstat (limited to '3673/CH9/EX9.15/Ex9_15.sce')
| -rw-r--r-- | 3673/CH9/EX9.15/Ex9_15.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3673/CH9/EX9.15/Ex9_15.sce b/3673/CH9/EX9.15/Ex9_15.sce new file mode 100644 index 000000000..982da0c05 --- /dev/null +++ b/3673/CH9/EX9.15/Ex9_15.sce @@ -0,0 +1,17 @@ +//Example 9_15 page no:368
+clc;
+Zreal=2;
+Zimg=3;
+Vl=440;//line voltage
+Iph=10;//phase current
+Zph=sqrt(Zreal^2+Zimg^2);
+PF=Zreal/Zph;
+sinpi=0.83;
+Il=sqrt(3)*Iph;
+Active_power=sqrt(3)*Vl*Il*0.55;
+Reactive_power=sqrt(3)*Vl*Il*sinpi;
+Apparent_power=sqrt(3)*Vl*Il;
+disp(Active_power,"the Active power is (in W)");
+disp(Reactive_power,"the Reactive power is (in VAR)");
+disp(Apparent_power,"the Apparent power is (in VA)");
+//power varies slightly with textbook hence values are rounded off in text book
|