diff options
Diffstat (limited to '1445/CH1/EX1.5')
-rw-r--r-- | 1445/CH1/EX1.5/ch1_ex_5.sce | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/1445/CH1/EX1.5/ch1_ex_5.sce b/1445/CH1/EX1.5/ch1_ex_5.sce new file mode 100644 index 000000000..e42921133 --- /dev/null +++ b/1445/CH1/EX1.5/ch1_ex_5.sce @@ -0,0 +1,39 @@ +//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS +//Example 5 + +disp("CHAPTER 1"); +disp("EXAMPLE 5"); + +//VARIABLE INITIALIZATION +r1=2; //in Ohms +r2=4; //in Ohms +r3=8; //in Ohms +r4=8; //in Ohms +r5=2; //middle resistance in Ohms + +//SOLUTION + +//To find resistance between a and c +req1=r1+r2; +req2=r1+r4; +req3=(req1*r1)/(req1+r1); +req4=(req3*req2)/(req3+req2); +disp(sprintf("The eqiuvalent resistance between points a and c is %f Ω",req4)); + +//To find resistance between b and d +//converting delta abc into star +//delta values +rab=r1; +rbc=r2; +rac=6; +//star values +r=rab+rbc+rac; +ra=(rab*rbc)/r; +rb=(rab*rac)/r; +rc=(rbc*rac)/r; +req5=rb+rac; +req6=rc+8; +req7=ra+((req5*req6)/(req5+req6)); +disp(sprintf("The eqiuvalent resistance between points b and d is %f Ω",req7)); + +//END |