summaryrefslogtreecommitdiff
path: root/650/CH9/EX9.14/14.sce
blob: 54315b9e1c836171a26cf25add0aa964ad5f79c8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clc
A=0.01; // m^2
L=0.3; // m
N=60/60; // rps
V_act=10.6/3600; // m^3/s
rho=1000; // kg/m^3
g=9.81; // m/s^2
Q=10.6/3600; // m^3/s
H=15; // m

V=A*L*N;

Cd=V_act/V;
disp("Coefficient of discharge =")
disp(Cd)

P=rho*g*Q*H;
disp("The power required =")
disp(P)
disp("W")