diff options
Diffstat (limited to '343/CH3/EX3.17/ex3_17.sce')
-rwxr-xr-x | 343/CH3/EX3.17/ex3_17.sce | 19 |
1 files changed, 10 insertions, 9 deletions
diff --git a/343/CH3/EX3.17/ex3_17.sce b/343/CH3/EX3.17/ex3_17.sce index d9e380143..2b16cb8b8 100755 --- a/343/CH3/EX3.17/ex3_17.sce +++ b/343/CH3/EX3.17/ex3_17.sce @@ -1,10 +1,11 @@ -clc
-w1=3000 //Assigning values to parameters
-w2=5000
-t=atan(sqrt(3)*(w2-w1)/(w1+w2))
-pf=cos(t)
-p=w1+w2
-il=p/(sqrt(3)*vl*cos(t))
-disp("Watts",p,"Total Power supplied is")
-disp(pf,"Power factor is")
+clc +w1=3000 //Assigning values to parameters +w2=5000 +vl=400 +t=atan(sqrt(3)*(w2-w1)/(w1+w2)) +pf=cos(t) +p=w1+w2 +il=p/(sqrt(3)*vl*cos(t)) +disp("Watts",p,"Total Power supplied is") +disp(pf,"Power factor is") disp("Amperes",il,"The line current is")
\ No newline at end of file |