1 files changed, 14 insertions, 0 deletions
diff --git a/2252/CH7/EX7.1/Ex7_1.sce b/2252/CH7/EX7.1/Ex7_1.sce
new file mode 100755
index 000000000..3a626c6ea
--- /dev/null
+++ b/2252/CH7/EX7.1/Ex7_1.sce
@@ -0,0 +1,14 @@
+
+//calculating current flowing in the circuit
+L=0.1//inductance
+f=50//frequency
+Xl=2*%pi*f*L
+R=15//total resistance in the circuit
+Z=sqrt(R^2+Xl^2)
+V=230//voltage applied to series circuit
+I=V/Z
+mprintf("Current flowing in the circuit=%f A\n",I)
+//calculating power factor
+pf=R/Z
+mprintf("Power factor of the circuit is %f(lagging)\nVoltage across reactor=%f V\nVoltage across resistor=%f V",pf,I*Xl,I*R)
+