blob: d31cc4e3936c8d98c74e7810e5e9a2840f78d2d1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
clc
rho=867; // kg/m^3
Q=12/3600; // m^3/s
u=7.5*10^(-4); // Ns/m^2
L=200; // m
H=10; // m
g=9.81; // m/s^2
d=(H*2*g/(4*0.079*(4*rho*Q/%pi/u)^(-1/4)*L*(4*Q/%pi)^2))^(-4/19);
disp("Internal diameter of the pipeline =")
disp(d)
disp("m")
Re=4*rho*Q/%pi/d/u;
disp("Re =")
disp(Re)
disp("The value of Reynolds number lies between 4000 and 10^5, confirming the validity of using the Blasius equation for smooth-walled pipes")
|
