summaryrefslogtreecommitdiff
path: root/51/CH2/EX2.5/2_5.sce
blob: 7af70d7f92bf574fc97dea32e02d61b0dd141c9b (plain)
1
2
3
4
5
6
7
8
9
10
clc;
clear;
gamma1=9.8;//kN/m^3
gamma2=15.6;//kN/m^3
h1=1;//m
h2=0.5;//m
//pA-(gamma1)*h1-h2*(gamma2)+(gamma1)*(h1+h2)=pB
//pA-pB=diffp
diffp=((gamma1)*h1+h2*(gamma2)-(gamma1)*(h1+h2));
disp("kPa",diffp,"The difference in pressures at A and B =")