summaryrefslogtreecommitdiff
path: root/1445/CH2/EX2.38/Ex2_38.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH2/EX2.38/Ex2_38.sce')
-rw-r--r--1445/CH2/EX2.38/Ex2_38.sce8
1 files changed, 4 insertions, 4 deletions
diff --git a/1445/CH2/EX2.38/Ex2_38.sce b/1445/CH2/EX2.38/Ex2_38.sce
index bce55490e..b429b6181 100644
--- a/1445/CH2/EX2.38/Ex2_38.sce
+++ b/1445/CH2/EX2.38/Ex2_38.sce
@@ -1,10 +1,10 @@
//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
//Example 38 // read it as example 37 in the book on page 2.93
+clc;
disp("CHAPTER 2");
disp("EXAMPLE 38");
-//
-//Solve exercise 36 by j method
+
//VARIABLE INITIALIZATION
z1=10+15*%i;
z2=12-20*%i;
@@ -15,10 +15,10 @@ magZ=sqrt(real(Z)^2+imag(Z)^2);
I=V/magZ;
pf=real(Z)/magZ;
disp("SOLUTION (a)");
-disp(sprintf("The current is %.1f Amp", I));
+disp(sprintf("The current is %f Amp", I));
//
disp("SOLUTION (b)");
-disp(sprintf("The Power factor is %.3f lagging", pf));
+disp(sprintf("The Power factor is %f", pf));
disp(" ");
//
//END