clc
//initialisation of variables
t= 4 //hr
Ihp= 8 //ihp
Ohp= 5 //hp
//CALCULATIONS
Hl= t*2544*(Ihp-Ohp)
//RESULTS
printf ('total Btu heat loss over a period of 4hr = %.f Btu',Hl)