summaryrefslogtreecommitdiff
path: root/779/CH1/EX1.4/1_4.sce
blob: 97ff90a34ac7f6c85c22bddfe2e87f4b4d67fa20 (plain)
1
2
3
4
5
6
7
8
Pr = 1.033e05; // Required Pressure in bar
function y = pressure(p)
  y = p^(-0.714);
endfunction;
g = 9.81; // Acceleration due to gravity in m/s2
H = ((2.5e05^0.714)/g)*intg(0,Pr,pressure); // Depth of atmosphere required in m
disp("Km",H/1000,"The depth of atmosphere required is ")