blob: ef265620cc656d8957d9e48da4c625196275426d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc; funcprot(0);
//Example 4.2 Standard Pressure at Altitude After 35332 Feet
// Initialisation of variables
P0 = 6.925;
Z = 40000;
R = 53.33;
Z0 = 35332;
T = 392.4;
rho_0 = 0.002378;
P0_SL = 29.92; // Pressure at sea level
// Calculations
P = P0*%e^((-Z+Z0)/(R*T));
rho = rho_0 *P*T0/(P0_SL*T);
//Results
disp(rho,"Density (slug per cu ft):",P,"Pressure (inch Hg):", "!---At an altitude of 40000 ft in standard altitude ---! ");
|
