blob: abf977ce3b37fa979ba010d2d08801c0b5ac2148 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clc
m=6; //kg
T1=25; //0C
T2=125; //0C
disp("(i) Heat transferred")
Q=integrate('m*(0.4+0.004*T)','T',T1,T2);
disp("heat tranferred=")
disp(Q)
disp("kJ")
disp("(ii) Mean specific heat of the gas")
c_n=Q/m/(T2-T1);
disp("Mean specific heat=")
disp(c_n)
disp("kJ/kg.0C")
|
