blob: b335fff5980851009c9ec887336e2820711a7ab6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
clc;
disp("Example 9.2")
density= 1000 // in kg/m^3
densitym=13600 // of mercury in kg/m^3
c=0.62 // orifice coefficient
b=0.5
U=135.6/60 // velocity in m/s
delP= ((U*((1-b^4)^0.5)/c)^2)*density/2
g=9.81
R=delP/(g*(densitym-density))
disp(R,"Reading on the manometer is ")
|
