summaryrefslogtreecommitdiff
path: root/2075/CH4/EX4.15/pe4_15.sce
blob: 7e46fa1c9779280839455d27be485657abc1d58b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//example 4.15
clc; funcprot(0);
// Initialization of Variable
R=8//resistance
Ts=35//temperature
Ta=150//temperature
Vm=42//voltage
//calcuation
Vp=Vm-5;
Vr=Vp/2^.5;
Pm=Vr^2/R;
disp(Pm,"power delivered in watt:")
P=45;
Qs=(Ta-Ts)/P-1.2;
disp(round(Qs*10)/10,"thermal resistance in degreeC/W")
clear()