diff options
Diffstat (limited to '1319/CH4/EX4.7/4_7.sce')
| -rw-r--r-- | 1319/CH4/EX4.7/4_7.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/1319/CH4/EX4.7/4_7.sce b/1319/CH4/EX4.7/4_7.sce new file mode 100644 index 000000000..077c11f93 --- /dev/null +++ b/1319/CH4/EX4.7/4_7.sce @@ -0,0 +1,20 @@ +//Dynamometer wattmeter power calculation of the load
+
+clc;
+clear;
+
+P=250; // Power Recorded by the wattmeter
+
+V=200; // Load voltage
+
+R=2000; // Resistance of the highly non-inductive pressure coil
+
+I=V/R; // Ohm's Law
+
+Pcoil=V*I; // Power Absorbed by the pressure coil
+
+Pl=P-Pcoil; // Power taken by the load
+
+printf('The Power taken by the load = %g watts. \n',Pl)
+
+
|