1 files changed, 23 insertions, 0 deletions
diff --git a/343/CH1/EX1.43/ex_43.sce b/343/CH1/EX1.43/ex_43.sce
new file mode 100755
index 000000000..5d19928fe
--- /dev/null
+++ b/343/CH1/EX1.43/ex_43.sce
@@ -0,0 +1,23 @@
+R1=6;                              //Assigning values to parameters
+R2=4;
+R3=3;
+R4=5;
+R5=5;
+R6=2;
+R7=4;
+Rx=R3+R4+(R3*R4)/R6;             //Converting Star to Delta
+Ry=R4+R6+(R4*R6)/R3;
+Rz=R3+R6+(R3*R6)/R4;
+disp(Rx)
+disp(Ry)
+disp(Rz)
+Ra=(R5*Rz)/(R5+Rz);
+Rb=(R7*Ry)/(R7+Ry);
+Rl=(R1*R2)/(R1+R2+Rx);          //Converting Delta to Star
+Rm=(R2*Rx)/(R1+R2+Rx);
+Rn=(R1*Rx)/(R1+R2+Rx);
+Rp=Ra+Rn;
+Rq=Rb+Rm;
+Rr=(Rp*Rq)/(Rp+Rq);
+Req=Rl+Rr;
+disp("Ohms",Req,"Eqivalent resistance of the network");
+\ No newline at end of file