diff options
Diffstat (limited to '343/CH1/EX1.41/ex_41.sce')
-rwxr-xr-x | 343/CH1/EX1.41/ex_41.sce | 22 |
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 |