summaryrefslogtreecommitdiff
path: root/620/CH10/EX10.8.b/example10_8b.sce
blob: a9c2c13db0e7d1f1815381ce7c96b75a1b75c4bf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
v1=10;
v2=20;
r1=10^3;
r2=2*10^3;
r3=3*10^3;
r4=4*10^3;
r5=5*10^3;
v=v1*r2/(r1+r2);
r=r3+r1*r2/(r1+r2);
v5=(v2-v)*r5/(r5+r);
vth=v2-v5;
rth=r*r5/(r+r5);
i=vth/(rth+r4);
disp("the current (in mA) in R4 is"); disp(i*10^3);