summaryrefslogtreecommitdiff
path: root/2075/CH6/EX6.7/pe6_7.sce
blob: 149cc325691fd7b8b6a228d126ced64cef84408e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//example 6.7
clc; funcprot(0);
// Initialization of Variable
R1=.11;//resistance
Vd=28;//voltage
R2=6;//ohm
D=.4;//duty cycle
Q=62;
Ro=2.6*R1;
disp(Ro,"worstcase resistance in ohm:")
Ip=Vd/(R2+Ro);
disp(Ip,"load current in A:")
Vl=Ip*R2;
disp(Vl,"load voltage in V:")
Pl=D*Vl*Ip;
disp(Pl,"load power in W:")
Vq=Ip*Ro;
disp(Vq,"drop voltage in V:")
Pq=D*Vq*Ip;
disp(round(Pq*10)/10,"power in W:")
T=40+round(Pq*10)/10*Q;
disp(T,"temperature in deg.C")
clear()