diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2252/CH7/EX7.3/Ex7_3.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '2252/CH7/EX7.3/Ex7_3.sce')
-rwxr-xr-x | 2252/CH7/EX7.3/Ex7_3.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/2252/CH7/EX7.3/Ex7_3.sce b/2252/CH7/EX7.3/Ex7_3.sce new file mode 100755 index 000000000..bf97b140e --- /dev/null +++ b/2252/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,25 @@ +
+//calculating resistance, reactance and impedance of choke coil
+I=7.5//current flowing through the circuit
+V1=110//voltage across non-inductive resistor
+R=V1/I
+V2=180//voltage across choke coil
+Z=V2/I
+Zt=230/I//impedance of whole circuit
+r=(Zt^2-R^2-Z^2)/(2*R)
+Xl=sqrt(Z^2-r^2)
+mprintf("Reactance of coil=%f ohm\nResistance of coil=%f ohm\nImpedance of coil=%f ohm\n",Xl,r,Z)
+//calculating total resistance and impedance of the circuit
+Rt=r+R
+Zt=sqrt(Rt^2+Xl^2)
+mprintf("Total resistance of circuit=%f ohm\nTotal impedance of circuit=%f ohm\n",Rt,Zt)
+//calculating power absorbed by the coil
+P1=I^2*r
+mprintf("Power absorbed by the coil=%f W\n",P1)
+//calculating power drawn by circuit
+P2=I^2*(r+R)
+mprintf("Power drawn by the circuit=%f W\n",P2)
+//calculating power factor of whole circuit
+pf=Rt/Zt
+mprintf("Power factor of the whole circuit=%f lagging",pf)
+//answers vary from the textbook due to round off error
|