summaryrefslogtreecommitdiff
path: root/2789/CH11/EX11.2/Ex11_2.sce
blob: 7541e081f49a241f11945f940e472fa938da9471 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear;
clc;

//page no. 411

P = 25;//in. of mercury
p = 18;//in. of mercury
T = 150;//degreeF

k = P/p;
if k < (1.893) then
    V = sqrt(2*32.2*186.5*(T+460)*(1-(1/k)^0.286));
end

printf('The local velocity just upstream from the pitot static tube = %d fps',V);