summaryrefslogtreecommitdiff
path: root/887/CH1/EX1.2/1_2.sce
blob: 9ab5947b10e4e975287db68af6fa00a0ea2bd2be (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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
clc 
//ex1.2

//element A
disp('ELEMENT A :')
V_a=12;
i_a=2;
P_a=V_a*i_a;      //passive reference configuration (current enters through +ve polarity)
if(P_a>0) then,      //absorption of power
    disp(P_a,'Power for element A in watts is')
    disp('As a battery, element A is being charged')
elseif(P_a<0) then,      //supplying of power
    disp(P_a,'Power for element A in watts is')
    disp('As a battery, element A is being discharged')
end

//element B
disp('ELEMENT B')
V_b=12;
i_b=1;
P_b=-V_b*i_b;      //opposite to passive reference configuration (current enters through -ve polarity)
if(P_b>0) then,      //absorption of power
    disp(P_b,'Power for element B in watts is')
    disp('As a battery, element B is being charged')
elseif(P_b<0) then,      //supplying of power
    disp(P_b,'Power for element B in watts is')
    disp('As a battery, element B is being discharged')
end

//element C
disp('ELEMENT C')
V_c=12;
i_c=-3;
P_c=V_c*i_c;      //passive reference configuration (current enters through +ve polarity)
if(P_c>0) then,      //absorption of power
    disp(P_c,'Power for element C in watts is')
    disp('As a battery, element C is being charged')
elseif(P_c<0) then,      //supplying of power
    disp(P_c,'Power for element C in watts is')
    disp('As a battery, element C is being discharged')
end