summaryrefslogtreecommitdiff
path: root/2672/CH1/EX1.42/Ex1_42.sce
blob: 1c5770a67e690473eb275d0f45358d883b45669d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
//Example 1_42
clc;
clear;
close;
format('v',4);
//given data :
V=24;//V
R1=2;//ohm
R2=3;//ohm
R3=5;//ohm
R4=8;//ohm
R5=2;//ohm
R6=5;//ohm
R7=3;//ohm
R8=6;//ohm
R57=R5+R7;//ohm//in series
RAB=R3;//ohm
RAC=R57;//ohm
RBC=R6;//ohm
RA=RAB*RAC/(RAB+RAC+RBC);//ohm
RB=RAB*RBC/(RAB+RAC+RBC);//ohm
RC=RAC*RBC/(RAB+RAC+RBC);//ohm
Req=R1+RA+(RC+R8)*(RB+R4)/(RC+R8+RB+R4)+R2;//ohm
I=V/Req;//A
disp(I,"Total current by the battery(A)");