1460/CH2/EX2.3/2_3.sce


1
2
3
4
5
6
7
8
9
10
11
12

clc
//initialization of variables
T1=500 //R
T2=1000 //R
w=2//lbm
//calculations
function[cp]=c(T)
    cp=0.282+0.00046*T
endfunction
Q=intg(T1,T2,c)
Heat=Q*w
printf("Heat flow = %d B",Heat-2)