diff options
Diffstat (limited to '1445/CH3/EX3.1/Ex3_1.sce')
-rw-r--r-- | 1445/CH3/EX3.1/Ex3_1.sce | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/1445/CH3/EX3.1/Ex3_1.sce b/1445/CH3/EX3.1/Ex3_1.sce index f9883c955..697de879a 100644 --- a/1445/CH3/EX3.1/Ex3_1.sce +++ b/1445/CH3/EX3.1/Ex3_1.sce @@ -1,6 +1,7 @@ //CHAPTER 3- THREE-PHASE A.C. CIRCUITS //Example 1 +clc; disp("CHAPTER 3"); disp("EXAMPLE 1"); @@ -13,29 +14,29 @@ xc=10; //capacitive reactance in Ohms //solution (i) v_ph=v_l/sqrt(3); //phase voltage=(line voltage)/sqrt(3) for star connection -disp(sprintf("(i) The phase voltage is %.2f V",v_ph)); +disp(sprintf("(i) The phase voltage is %f V",v_ph)); //solution (ii) z_ph=sqrt((r^2)+(xc^2)); I_l=v_ph/z_ph; //phase current = line current for star connection -disp(sprintf("(ii) The line current is %.2f A",I_l)); +disp(sprintf("(ii) The line current is %f A",I_l)); //solution (iii) -disp(sprintf("(iii) The phase current is %.2f A",I_l)); +disp(sprintf("(iii) The phase current is %f A",I_l)); //solution (iv) pow_fact=r/z_ph; -disp(sprintf("(iv) The power factor of the circuit is %.2f (leading)",pow_fact)); +disp(sprintf("(iv) The power factor of the circuit is %f (leading)",pow_fact)); //solution (v) p=sqrt(3)*v_l*I_l*pow_fact; -disp(sprintf("(v) The total power absorbed is %.0f W",p)); +disp(sprintf("(v) The total power absorbed is %f W",p)); //solution (vi) va=sqrt(3)*v_l*I_l; -disp(sprintf("(vi) The apparent power is %.0f VA",va)); +disp(sprintf("(vi) The apparent power is %f VA",va)); var=sqrt((va^2)-(p^2)); -disp(sprintf("The reactive power is %.0f VAR",var)); +disp(sprintf("The reactive power is %f VAR",var)); //Answers (v) and (vi) are different due to precision of floating point numbers |