summaryrefslogtreecommitdiff
path: root/2021/CH15/EX15.1/EX15_1.sce
blob: e096989261285584ad2f087eed2fe93f657c0631 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Finding of Velocities
//Given
T1=293;
T2=293;
P1=40;
P2=35;
R=287;
A1=30*10^-4;
A2=15*10^-4;
Q=0.15;
//To Find
rho1=P1/(R*T1);
V1=Q/(A1*rho1*10000);
rho2=P2/(R*T2);
V2=Q/(A2*rho2*10000);
disp("Velocity at Section-1 ="+string(V1)+" m/sec");
disp("Velocity at Section-2 ="+string(V2)+" m/sec");