//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");

