diff options
Diffstat (limited to '3871/CH7/EX7.5/Ex7_5.sce')
| -rw-r--r-- | 3871/CH7/EX7.5/Ex7_5.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/3871/CH7/EX7.5/Ex7_5.sce b/3871/CH7/EX7.5/Ex7_5.sce new file mode 100644 index 000000000..a5ba78d77 --- /dev/null +++ b/3871/CH7/EX7.5/Ex7_5.sce @@ -0,0 +1,20 @@ +//===========================================================================
+//chapter 7 example 5
+clc;clear all;
+
+//variable declaration
+f = 50; //frequency in Hz
+L = 5*10^-3 //inductance
+V = 100; //voltage in V
+I = 10; //current in A
+R1 = 3000; //resistance in Ω
+
+//calculations
+x = ((2*%pi*f*L)/R1); //tan(theta)
+theta = atan(x); //the angle by which the current in pressure coil lags behind the voltage
+//W = V*I*sin(90+theta) = V*I*cos(theta) = V*I*tan(theta)
+//W=V*I*theta //since theta is small
+W = V*I*x; //reading of wattmeter in watt
+
+//result
+mprintf("error = %3.2f watts",W);
|