1962/CH4/EX4.2/example4_2.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14


//example 4.2
//page 161
clc; funcprot(0);
// Initialization of Variable
h=2;
d=2.5/100;
g=9.81;
pi=3.14;
Cd=0.65;//coeff of discharge
A=pi*d^2/4;
Q=Cd*A*sqroot(2*g*h);
disp(Q*1000,"flow rate(l/s)=");
clear