diff options
Diffstat (limited to '1445/CH1/EX1.53')
-rw-r--r-- | 1445/CH1/EX1.53/ch1_ex_53.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/1445/CH1/EX1.53/ch1_ex_53.sce b/1445/CH1/EX1.53/ch1_ex_53.sce new file mode 100644 index 000000000..20596387d --- /dev/null +++ b/1445/CH1/EX1.53/ch1_ex_53.sce @@ -0,0 +1,27 @@ +//CHAPTER 1- D.C. CIRCUIT ANALYSIS AND NETWORK THEOREMS +//Example 53 + +disp("CHAPTER 1"); +disp("EXAMPLE 53"); + +//VARIABLE INITIALIZATION +v1=10; //LHS voltage source in Volts +v2=4; //RHS voltage source in Volts +r1=2; //LHS resistance in Ohms +r2=3; //in Ohms +r3=10; //in Ohms +r4=3; //in Ohms +r5=1; //RHS resistance in Ohms + +//SOLUTION +van=v1*(r2/(r1+r2)); //by voltage divider law +vbn=-v2*(r4/(r5+r4)); //by voltage divider law +ran=(r1*r2)/(r1+r2); +rbn=(r4*r5)/(r4+r5); +vab=(ran*0)+van-vbn+(rbn*0); +vth=vab; +disp(sprintf("The Thevenin voltage is %d V",vth)); + +//END + + |