summaryrefslogtreecommitdiff
path: root/3769/CH5/EX5.33/Ex5_33.sce
blob: a6a78328318f3dae73170991a3696b16743fbd7f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clear
//Given
Rab=500.0                      //ohm
Rl=500                        //ohm
Rbc=1500                      //ohm
E=50                          //Volts
Rac=2000.0                      //ohm
V=40

//Calculation
R=Rbc*Rl/(Rbc+Rl)
I=E/(Rab+R)
Pd=I*Rab
Rl1=E-Pd
I1=E/Rac
R12=V/I1

//Result
printf("\n (i) Potential difference across the road is  %0.2f  V",Rl1)
printf("\n (ii) Resistance at BC is  %0.3f  ohm", R12)