blob: 2436850b5dce3b155c01d8d722445dce315cfd3c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
clc;
clear;
exec ("C:\Program Files\scilab-5.3.0\bin\TCP\1.3data.sci");
//the air density d=P/(RT)
//1ft^2=144 inches^2
d=((p+atmp)*144)/((1716)*(T+460));
disp(d)
//slugs/ft^3
//weight of air
W=d*32.2*V;
//1lb=1 slug.ft/sq sec
disp("lb",W,"W=")
//taking various values of p a graph is plotted between W and p
x= -20:60;
for p= -20: 60
i=p+21;
y(1,i)=((p+atmp)*144/((1716)*(T+460)))*32.2*V;
end
plot(x,y)
xtitle('W vs p','p.psi','W,lb')
|
