diff options
Diffstat (limited to '343/CH3/EX3.17/ex3_17.sce')
| -rwxr-xr-x | 343/CH3/EX3.17/ex3_17.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/343/CH3/EX3.17/ex3_17.sce b/343/CH3/EX3.17/ex3_17.sce new file mode 100755 index 000000000..d9e380143 --- /dev/null +++ b/343/CH3/EX3.17/ex3_17.sce @@ -0,0 +1,10 @@ +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")
+disp("Amperes",il,"The line current is")
\ No newline at end of file |