551/CH16/EX16.7/7.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

clc
h=1800; //m
T=277; //K
t=4; //s
y=1.4;
R=287; //J/kg K

C=sqrt(y*R*T);

//tan(a)=h/t*V
//V=C/sin(a)
//From above two equations we get

a=(acos(C/h*t));

V=C/sin(a)*3600/1000;
disp("Speed of the aircraft =")
disp(V)
disp("km/h")