summaryrefslogtreecommitdiff
path: root/3841/CH19/EX19.1/Ex19_1.sce
blob: 3adceb582541636d2ca0362a953fa7ab33dfe57d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear
//given
//page no 379
//find the amount heat absourbed by the cooling system
//
hp=300.
F=0.38
f=19200.
hi=0.30
Hi=hp*F*f
C=hi*Hi
Cs=C/hp
printf("\n \n heat lost to cooling system %.2f per bhp-hr",Cs)