blob: 813d08ca22a4558149536b650c42700adf669b18 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
//Example 3.23
clc;
clear;
close;
format('v',7);
//Given data :
ABbar=sqrt(2)*4;//meter
xbar=ABbar/2;//meter
A=ABbar*1;//m^2
w=9.81;//kN/m^2
PH=w*A*xbar;//kN
disp(PH,"Horizontal component of resultant Pressure in kN : ");
hbar=2/3*ABbar;//meter
disp("Position of horizontal component of pressure is "+string(hbar)+" meter below free water surface.");
PV=w*[%pi*4^2/4-4*4/2]*1;//kN
disp(PV,"Verticalal component of resultant Pressure in kN : ");
|