blob: 28a71df0d478056cb0425dcb56492870ce3a1158 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
clc
//initialisation of variables
B= 34 //ft
z= 6 //ft
g= 32.2 //ft/sec^2
d= 6 //in
do= 2 //in
l= 6 //ft
l1= 0.04
//CALCULATIONS
s= sqrt((g*do^2*(B-6-z))/(l*d^2*(d/12)))
s1= s*60/(2*%pi)
hf= l1*(l/(2*g*(do/12)))*(d^2*s*d/(12*do^2))^2
//RESULTS
printf (' maximum friction head= %.2f ft',hf)
|
