summaryrefslogtreecommitdiff
path: root/1268/CH4/EX4.8/4_8.sce
blob: 56107898aee8eeff0d73dcf910e363821b80d3c8 (plain)
1
2
3
4
5
6
7
clc;
disp("Example 4.8")
Re=100000 // Reynold number
f=0.079/(Re^0.25) // friction factor according to 1/5th law
ratio= 1+ 3.75*((f/2)^0.5)
disp("The ratio of maximum velocity to the average velocity is ")
disp(ratio)