1 files changed, 19 insertions, 0 deletions
diff --git a/608/CH16/EX16.03/16_03.sce b/608/CH16/EX16.03/16_03.sce
new file mode 100755
index 000000000..b97cb57ac
--- /dev/null
+++ b/608/CH16/EX16.03/16_03.sce
@@ -0,0 +1,19 @@
+//Problem 16.03: A capacitor C is connected in parallel with a resistor R across a 120 V, 200 Hz supply. The supply current is 2 A at a power factor of 0.6 leading. Determine the values of C and R.
+
+//initializing the variables:
+pf = 0.6; // power factor
+V = 120; // in Volts
+f = 200; // in Hz
+I = 2; // in Amperes
+
+//calculation:
+phi = acos(pf)
+phid = phi*180/%pi
+IR = I*cos(phi)
+Ic = I*sin(phi)
+R = V/IR
+C = Ic/(2*%pi*f*V)
+
+printf("\n\n Result \n\n")
+printf("\n (a)Resistance R = %.0f Ohm ",R)
+printf("\n (b)Capacitance,C = %.2E F ",C)
+\ No newline at end of file