summaryrefslogtreecommitdiff
path: root/1364/CH12/EX12.10.4/12_10_4.sce
blob: 227c2d7e26f89c5740c95fb3af278cb95c0f8a66 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc
//initialisation of variables
p= 14.7 //lbf/in^2
r= 14
r1= 15
r2= 1.4
//CALCULATIONS
R= (r/r1)^(r2/(r2-1))
P= p*144*R
//RESULTS
printf ('pressure drop = %.f lbf/ft^2',P+2)