1 files changed, 17 insertions, 0 deletions
diff --git a/2096/CH2/EX2.24/EX_2_24.sce b/2096/CH2/EX2.24/EX_2_24.sce
new file mode 100755
index 000000000..4247a5ff7
--- /dev/null
+++ b/2096/CH2/EX2.24/EX_2_24.sce
@@ -0,0 +1,17 @@
+
+//Example 2.24//find unknow resistance and inductance
+clc;
+clear;
+R1=600;//in ohms
+f=1;//frequency in kHz
+C1=1;//in micro farad
+R2=100;//in ohms
+R3=1000;//in ohms
+Y1=((1/R1)+(%i*2*%pi*f*10^3*C1*10^-6));//
+Z2=R2;//
+Z3=R3;//
+Z4=Z2*Z3*Y1;//
+Rx= real(Z4);//
+Lx=(imag(Z4))/(2*%pi*f);//
+disp(round(Rx),"unknown resistance in ohms")
+disp(Lx*10^-3,"unknow capacitance in Henry")