blob: 8944960571a5a49af5cc0eeff8e5dc5b6fe38552 (
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
25
|
clear;
clc;
disp('Example 5.5');
// aim : To determine
// the new volume of the gas
// Given values
// initial codition
P1 = 140;// [kN/m^2]
V1 = .1;// [m^3]
T1 = 273+25;// [K]
// final condition
P2 = 700;// [kN/m^2]
T2 = 273+60;// [K]
// by charasteristic equation, P1*V1/T1=P2*V2/T2
V2=P1*V1*T2/(T1*P2);// final volume, [m^3]
mprintf('\nThe new volume of the gas is = %f m^3\n',V2);
// End
|
