summaryrefslogtreecommitdiff
path: root/343/CH1/EX1.41/ex_41.sce
diff options
context:
space:
mode:
Diffstat (limited to '343/CH1/EX1.41/ex_41.sce')
-rwxr-xr-x343/CH1/EX1.41/ex_41.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/343/CH1/EX1.41/ex_41.sce b/343/CH1/EX1.41/ex_41.sce
new file mode 100755
index 000000000..f3b8deae8
--- /dev/null
+++ b/343/CH1/EX1.41/ex_41.sce
@@ -0,0 +1,22 @@
+R1=8; //Assigning values to parameters
+R2=4;
+R3=12;
+R4=12;
+R5=34;
+R6=30;
+R7=30;
+R8=17;
+R9=13;
+R10=R1+R2;
+R11=R8+R9;
+Ra=(R10*R3)/(R3+R4+R10); //Converting Delta to Star
+Rb=(R3*R4)/(R3+R4+R10);
+Rc=(R10*R4)/(R3+R4+R10);
+Rx=(R6*R7)/(R6+R7+R11); //Converting Delta to Star
+Ry=(R7*R11)/(R6+R7+R11);
+Rz=(R6*R11)/(R6+R7+R11);
+Rl=R5+Ra+Rx;
+Rm=Rc+Ry;
+Rn=(Rl*Rm)/(Rl+Rm);
+Req=Rb+Rz+Rn;
+disp("Ohms",Req,"Equivalent resistance of the network"); \ No newline at end of file