blob: 948975211d9c344611c9b7395ec818518197e93d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc
clear
//INPUT
v1=10^3;//inital volume in cc
v2=2*v1;//final volume in cc
p1=76*13.6*981;//pressure in dyne/sq.cm
t1=273;//intial temperature in K
d=1.29;//density of the gas gm/lit
cv=0.168;//specific heat at constant volume in cal/gm
//CALCULATIONS
t2=(v2/v1)*t1;//final temperature in K
r=0.068;//universal gas constant in cal
cp=cv+r;//specific heat at constant pressure in cal
q=d*cp*(t2-t1);//heat supplied in cal
//OUTPUT
mprintf('the heat supplied to the gas is %3.2f cal',q)
|
