blob: 2523477a8bbd9497a356f1ba7d28699aff2bcf3c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//Finding of Boundary layer thickness , Drag Force
//Given
x=1;
L=1.5;
b=1.2;
vs=0.25;
mu=0.001;
rho=1000;
x2=1.2;
L2=1.2;
//To Find
A=L*b;
R=(rho*vs*x)/mu;
t=(5.477*x)/sqrt(R);
tau=(0.365*mu*vs*sqrt(R))/x;
R1=(rho*vs*L)/mu;
Cd=1.46/sqrt(R1);
Fd=(1/2)*Cd*rho*(vs)^2*A;
disp("Boundary Layer Thickness ="+string(t)+" meter");
disp("Drag Force ="+string(Fd)+" Newtons");
|
