summaryrefslogtreecommitdiff
path: root/1523/CH4/EX4.59
diff options
context:
space:
mode:
Diffstat (limited to '1523/CH4/EX4.59')
-rwxr-xr-x1523/CH4/EX4.59/ex4_59.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/1523/CH4/EX4.59/ex4_59.sce b/1523/CH4/EX4.59/ex4_59.sce
new file mode 100755
index 000000000..b16078277
--- /dev/null
+++ b/1523/CH4/EX4.59/ex4_59.sce
@@ -0,0 +1,15 @@
+//AC Circuits : example 4.59 :(pg 4.47)
+pf=0.5;
+C=79.59*10^-6;
+f=50;
+XC=(1/(2*%pi*f*C));
+R=pf*XC;
+Zcoil=XC;
+XL=sqrt((Zcoil^2)-(R^2));
+L=(XL/(2*%pi*f));
+printf("\npf=0.5 \nC=79.57uF \nf=50 Hz \nVcoil=VC ");
+printf("\nXC=1/2*pi*f*C =%.f Ohm",XC);
+printf("\nVcoil=VC \nZcoil=XC=%.f Ohm",XC);
+printf("\npf of coil=cos(phi)=R/Zcoil \nResistance of coil R=%.f Ohm",R);
+printf("\nXL=sqrt((Zcoil^2)-(R^2))=%.2f Ohm",XL);
+printf("\nXL=2*pi*f*L \nInductance of coil=%.2f H",L); \ No newline at end of file