diff options
Diffstat (limited to '1994/CH7/EX7.22')
| -rwxr-xr-x | 1994/CH7/EX7.22/Example7_22.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1994/CH7/EX7.22/Example7_22.sce b/1994/CH7/EX7.22/Example7_22.sce new file mode 100755 index 000000000..e1676c446 --- /dev/null +++ b/1994/CH7/EX7.22/Example7_22.sce @@ -0,0 +1,19 @@ +//Chapter-7,Example7_22,pg 7-66
+V=230
+I=4
+t=6
+Pf=1
+N=2208
+Et=V*I*Pf*t
+K=N/Et
+printf("meter constant\n")
+printf("K=%.2f rev/Wh\n",K)
+V=230
+I=5
+t=4
+N=1472
+Et=V*I*Pf*t
+Er=N/K
+Pf=(Er/Et)
+printf("power factor\n")
+printf("Pf=%.2f lagging",Pf)
|