summaryrefslogtreecommitdiff
path: root/2021/CH21/EX21.12/EX21_12.sce
blob: c829e9b10ca2a0fa0a88ba3ac87d209891c66f51 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Finding of Pressure of water
//Given
W=490500;
Fr=39240;
d=40;
//To Find
A=(%pi/4)*d^2;
Wu=W+Fr;
P1=Wu/A;
Wd=W-Fr;
P2=Wd/A;
disp("Pressure while moving up ="+string(P1)+" N/cm^2");
disp("Pressure while moving down ="+string(P2)+" N/cm^2");