diff options
Diffstat (limited to '343/CH3/EX3.20/ex3_20.sce')
-rwxr-xr-x | 343/CH3/EX3.20/ex3_20.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/343/CH3/EX3.20/ex3_20.sce b/343/CH3/EX3.20/ex3_20.sce new file mode 100755 index 000000000..9219d030a --- /dev/null +++ b/343/CH3/EX3.20/ex3_20.sce @@ -0,0 +1,13 @@ +clc
+vl=220 //Assigning values to parameters
+il=38
+n=0.88
+p=11200
+ip=p/n
+t=acosd(ip/(sqrt(3)*vl*il))
+pf=cosd(t)
+w2=vl*il*cosd(30-t)
+w1=vl*il*cosd(30+t)
+disp("Watts",w2,"The wattmeter reading is")
+disp("Watts",w1,"The wattmeter reading is")
+disp(pf,"Power factor is")
\ No newline at end of file |