1 files changed, 22 insertions, 0 deletions
diff --git a/2384/CH4/EX4.30/ex4_30.sce b/2384/CH4/EX4.30/ex4_30.sce
new file mode 100755
index 000000000..78674001e
--- /dev/null
+++ b/2384/CH4/EX4.30/ex4_30.sce
@@ -0,0 +1,22 @@
+// Exa 4.30
+clc;
+clear;
+close;
+format('v',6)
+// Given data
+R = 4;// in ohm
+L = 0.5;// in H
+V = 100;// in V
+f = 50;// in Hz
+X_L = 2*%pi*f*L;// in ohm
+X_C = X_L;// in ohm
+// X_C = 1/(2*%pi*f*C);
+C = 1/(X_C*2*%pi*f);// in F
+C = C * 10^6;// in F
+disp(C,"The value of capacitance in µF is");
+I = V/R;// in A]
+V_C = I*X_C;// in V
+disp(V_C,"The voltage across the capacitance in V");
+omega = 2*%pi*f;// in rad/sec
+Q = (omega*L)/R;
+disp(Q,"The Q factor of the circuit is");