summaryrefslogtreecommitdiff
path: root/343/CH3/EX3.17/ex3_17.sce
diff options
context:
space:
mode:
Diffstat (limited to '343/CH3/EX3.17/ex3_17.sce')
-rwxr-xr-x343/CH3/EX3.17/ex3_17.sce19
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