blob: 9a83e10fc402c266e5481b09858af34586facb94 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
clc();
clear;
// To find the amount of heat transferred to the air
Tw = 200; // Wall temperature in F
delp = 14.2; // Pressure pressure in lb/in^2
d = 0.8/12; // Diameter in ft
R = delp*%pi*d^2/4; // resistance of tube
Tb = 137; // bulk temperature of wall in F
q = R*32.2*0.24*3600*(Tw-Tb)/100; // Heat loss in Btu/hr
printf("The heat loss from the tube well to the air when the plate is heated to a temperature of 200 F is %d Btu/hr",q);
|