summaryrefslogtreecommitdiff
path: root/1571/CH9/EX9.11/Chapter9_Example11.sce
blob: ef7b079cca55c07f5b38a0f51e6467189e6848a7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc
clear

//INPUT
p=200;//horse power of steam engine in lbs coal per hour
j=770;//joules constant in ft lbs per B.Th.U

//CALCULATIONS
w=12500*p*j;//equivalent work in ft.lb.per.hr
hp=w/(60*33000);//horse power

//OUTPUT
mprintf('hoose power of the engine is %3.2f',hp)